summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
authorThierry Vignaud <tv@mandriva.org>2008-09-17 15:54:41 +0000
committerThierry Vignaud <tv@mandriva.org>2008-09-17 15:54:41 +0000
commit97b7164fc2796febe5553e43a7e761cfad2612f3 (patch)
treed14c0d08970fb3e080e9b7af6cf113d49341bfab /perl-install
parente800fbea6d5eb3bb252ee93625f40bac823528da (diff)
downloaddrakx-97b7164fc2796febe5553e43a7e761cfad2612f3.tar
drakx-97b7164fc2796febe5553e43a7e761cfad2612f3.tar.gz
drakx-97b7164fc2796febe5553e43a7e761cfad2612f3.tar.bz2
drakx-97b7164fc2796febe5553e43a7e761cfad2612f3.tar.xz
drakx-97b7164fc2796febe5553e43a7e761cfad2612f3.zip
(per_entry_action_box) fix crashing when using 'strict' pragma
Diffstat (limited to 'perl-install')
-rw-r--r--perl-install/diskdrake/hd_gtk.pm2
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/diskdrake/hd_gtk.pm b/perl-install/diskdrake/hd_gtk.pm
index 618a49505..e89613bcf 100644
--- a/perl-install/diskdrake/hd_gtk.pm
+++ b/perl-install/diskdrake/hd_gtk.pm
@@ -218,7 +218,7 @@ sub per_entry_action_box {
$w;
} diskdrake::interactive::part_possible_actions($in, kind2hd($kind), $entry, $all_hds);
- gtkadd($box, create_scrolled_window(gtkpack__(Gtk2::VBox->new(), @buttons), shadow_type => 'none')) if @buttons;
+ gtkadd($box, create_scrolled_window(gtkpack__(Gtk2::VBox->new(), @buttons), undef, 'none')) if @buttons;
} else {
my $txt = !$::isStandalone && fsedit::is_one_big_fat_or_NT($all_hds->{hds}) ?
N("You have one big Microsoft Windows partition.