summaryrefslogtreecommitdiffstats
path: root/perl-install/ugtk2.pm
diff options
context:
space:
mode:
authorThierry Vignaud <tvignaud@mandriva.org>2002-11-28 08:52:48 +0000
committerThierry Vignaud <tvignaud@mandriva.org>2002-11-28 08:52:48 +0000
commit8c147bebe681e81af173885b6fb86636a9fea22d (patch)
tree70a538acb08583accb5662acea4c8d2837f692d5 /perl-install/ugtk2.pm
parent3ab14f78e3ec66cf297fe62287bbabc4da2e8e86 (diff)
downloaddrakx-backup-do-not-use-8c147bebe681e81af173885b6fb86636a9fea22d.tar
drakx-backup-do-not-use-8c147bebe681e81af173885b6fb86636a9fea22d.tar.gz
drakx-backup-do-not-use-8c147bebe681e81af173885b6fb86636a9fea22d.tar.bz2
drakx-backup-do-not-use-8c147bebe681e81af173885b6fb86636a9fea22d.tar.xz
drakx-backup-do-not-use-8c147bebe681e81af173885b6fb86636a9fea22d.zip
fix create_factory_menu*(): since we get an object and not anymore a
hash, let just return factory as another variable...
Diffstat (limited to 'perl-install/ugtk2.pm')
-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 8596f2472..74fdfc5c9 100644
--- a/perl-install/ugtk2.pm
+++ b/perl-install/ugtk2.pm
@@ -391,8 +391,7 @@ sub create_factory_menu_ {
$widget->create_items([ @menu_items ]);
$window->add_accel_group($accel_group);
my $menu = $widget->get_widget($name);
- $menu->{factory} = $widget;
- $menu
+ $menu, $menu->{factory} = $widget;
}
sub create_factory_menu { create_factory_menu_(Gtk2::MenuBar->get_type, '<main>', @_) }