From c0d5615fd3e1f76304cd2b53e6625a7b7f94e602 Mon Sep 17 00:00:00 2001 From: Thierry Vignaud Date: Tue, 12 Jul 2016 02:03:55 +0200 Subject: RAID: allow to toggle to expert mode (mga#5804) --- perl-install/diskdrake/hd_gtk.pm | 4 +--- 1 file changed, 1 insertion(+), 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, -- cgit v1.2.1