summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
authorThierry Vignaud <tvignaud@mandriva.org>2002-11-28 10:09:06 +0000
committerThierry Vignaud <tvignaud@mandriva.org>2002-11-28 10:09:06 +0000
commit39247d21083f30a5905ece7297f9e497bb52bcbb (patch)
tree31b08d2fb0c2de6651dd03488ecb5b3c4efdb534 /perl-install
parent8c147bebe681e81af173885b6fb86636a9fea22d (diff)
downloaddrakx-39247d21083f30a5905ece7297f9e497bb52bcbb.tar
drakx-39247d21083f30a5905ece7297f9e497bb52bcbb.tar.gz
drakx-39247d21083f30a5905ece7297f9e497bb52bcbb.tar.bz2
drakx-39247d21083f30a5905ece7297f9e497bb52bcbb.tar.xz
drakx-39247d21083f30a5905ece7297f9e497bb52bcbb.zip
perl_checker fixes
Diffstat (limited to 'perl-install')
-rw-r--r--perl-install/ugtk2.pm3
1 files changed, 1 insertions, 2 deletions
diff --git a/perl-install/ugtk2.pm b/perl-install/ugtk2.pm
index 74fdfc5c9..4433f0650 100644
--- a/perl-install/ugtk2.pm
+++ b/perl-install/ugtk2.pm
@@ -390,8 +390,7 @@ sub create_factory_menu_ {
my $widget = Gtk2::ItemFactory->new($type, $name, my $accel_group = Gtk2::AccelGroup->new);
$widget->create_items([ @menu_items ]);
$window->add_accel_group($accel_group);
- my $menu = $widget->get_widget($name);
- $menu, $menu->{factory} = $widget;
+ ($widget->get_widget($name), $widget);
}
sub create_factory_menu { create_factory_menu_(Gtk2::MenuBar->get_type, '<main>', @_) }