summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
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 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>', @_) }