diff options
author | Thierry Vignaud <thierry.vignaud@gmail.com> | 2016-07-12 02:03:55 +0200 |
---|---|---|
committer | Thierry Vignaud <thierry.vignaud@gmail.com> | 2016-07-12 02:03:55 +0200 |
commit | c0d5615fd3e1f76304cd2b53e6625a7b7f94e602 (patch) | |
tree | cb546a9777c77dbfaa53b73cf6681e11efc1c061 /perl-install | |
parent | 6d7b3b2665e292e2decdab8cca76406926d0ad04 (diff) | |
download | drakx-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.pm | 4 |
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, |