summaryrefslogtreecommitdiffstats
path: root/perl-install/standalone
diff options
context:
space:
mode:
Diffstat (limited to 'perl-install/standalone')
-rwxr-xr-xperl-install/standalone/harddrake214
1 files changed, 9 insertions, 5 deletions
diff --git a/perl-install/standalone/harddrake2 b/perl-install/standalone/harddrake2
index a04a647e6..48dfef856 100755
--- a/perl-install/standalone/harddrake2
+++ b/perl-install/standalone/harddrake2
@@ -176,11 +176,15 @@ $w->{window}->add(gtkpack_(0, Gtk2::VBox->new(0, 0),
})
),
),
- if_($::isEmbedded, 0, gtkpack(create_hbox(),
- gtksignal_connect(Gtk2::Button->new(N("Options")), event => popup_menu($opt_menu), $menubar),
- gtksignal_connect(Gtk2::Button->new(N("Help")), event => popup_menu($help_menu), $menubar),
- gtksignal_connect(Gtk2::Button->new(N("Quit")), clicked => \&quit_global),
- ),
+ if_($::isEmbedded, 0, gtkpack(Gtk2::HBox->new,
+ gtkpack(create_hbox('start'),
+ gtksignal_connect(Gtk2::Button->new(N("Help")), event => popup_menu($help_menu), $menubar),
+ gtksignal_connect(Gtk2::Button->new(N("Options")), event => popup_menu($opt_menu), $menubar),
+ ),
+ gtkpack(create_hbox('end'),
+ gtksignal_connect(Gtk2::Button->new(N("Quit")), clicked => \&quit_global),
+ ),
+ ),
)
)
);