diff options
author | Pascal Rigaux <pixel@mandriva.com> | 2002-11-26 20:14:19 +0000 |
---|---|---|
committer | Pascal Rigaux <pixel@mandriva.com> | 2002-11-26 20:14:19 +0000 |
commit | 841fa6677c7ca88bed65378dd7135969156f3a05 (patch) | |
tree | bca19a1d36e3b9c58e882e4c68fb213f7a3e7134 /perl-install | |
parent | b51ffa9db486393e7b2531240db34df49a658141 (diff) | |
download | drakx-841fa6677c7ca88bed65378dd7135969156f3a05.tar drakx-841fa6677c7ca88bed65378dd7135969156f3a05.tar.gz drakx-841fa6677c7ca88bed65378dd7135969156f3a05.tar.bz2 drakx-841fa6677c7ca88bed65378dd7135969156f3a05.tar.xz drakx-841fa6677c7ca88bed65378dd7135969156f3a05.zip |
fix undeclared variable
Diffstat (limited to 'perl-install')
-rw-r--r-- | perl-install/diskdrake/removable_gtk.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/diskdrake/removable_gtk.pm b/perl-install/diskdrake/removable_gtk.pm index 451222b6c..c61b61a22 100644 --- a/perl-install/diskdrake/removable_gtk.pm +++ b/perl-install/diskdrake/removable_gtk.pm @@ -17,7 +17,7 @@ sub per_entry_action_box { N("Options") => \&raw_hd_options, N("Type") => \&removable_type, ); - @buttons = map_each { + my @buttons = map_each { my ($txt, $f) = @_; gtksignal_connect(new Gtk::Button($txt), clicked => sub { try_('', $f, $entry) }); } group_by2 @l; |