diff options
Diffstat (limited to 'perl-install/ugtk.pm')
| -rw-r--r-- | perl-install/ugtk.pm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/perl-install/ugtk.pm b/perl-install/ugtk.pm index 9e8af572a..01613c9fb 100644 --- a/perl-install/ugtk.pm +++ b/perl-install/ugtk.pm @@ -340,9 +340,9 @@ sub create_notebook { sub create_packtable { my ($options, @l) = @_; my $w = new Gtk::Table(0, 0, $options->{homogeneous} || 0); - map_index { + each_index { my ($i, $l) = ($_[0], $_); - map_index { + each_index { my ($j) = @_; if ($_) { ref $_ or $_ = new Gtk::Label($_); |