summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
authorThierry Vignaud <thierry.vignaud@gmail.com>2016-07-12 02:03:55 +0200
committerThierry Vignaud <thierry.vignaud@gmail.com>2016-07-12 02:03:55 +0200
commitc0d5615fd3e1f76304cd2b53e6625a7b7f94e602 (patch)
treecb546a9777c77dbfaa53b73cf6681e11efc1c061 /perl-install
parent6d7b3b2665e292e2decdab8cca76406926d0ad04 (diff)
downloaddrakx-c0d5615fd3e1f76304cd2b53e6625a7b7f94e602.tar
drakx-c0d5615fd3e1f76304cd2b53e6625a7b7f94e602.tar.gz
drakx-c0d5615fd3e1f76304cd2b53e6625a7b7f94e602.tar.bz2
drakx-c0d5615fd3e1f76304cd2b53e6625a7b7f94e602.tar.xz
drakx-c0d5615fd3e1f76304cd2b53e6625a7b7f94e602.zip
RAID: allow to toggle to expert mode (mga#5804)
Diffstat (limited to 'perl-install')
-rw-r--r--perl-install/diskdrake/hd_gtk.pm4
1 files changed, 1 insertions, 3 deletions
diff --git a/perl-install/diskdrake/hd_gtk.pm b/perl-install/diskdrake/hd_gtk.pm
index 985d99b71..6c7542862 100644
--- a/perl-install/diskdrake/hd_gtk.pm
+++ b/perl-install/diskdrake/hd_gtk.pm
@@ -231,9 +231,7 @@ sub per_kind_action_box {
my ($box, $kind) = @_;
$_->destroy foreach $box->get_children;
- $kind->{type} =~ /hd|lvm/ or return;
-
- my @actions = (diskdrake::interactive::hd_possible_actions_base($in),
+ my @actions = (if_($kind->{type} =~ /hd|lvm/, diskdrake::interactive::hd_possible_actions_base($in)),
diskdrake::interactive::hd_possible_actions_extra($in));
foreach my $s (@actions) {
gtkadd($box,