From ab1d20e72fe7b09f9496655c996794a4747fdd2e Mon Sep 17 00:00:00 2001 From: Thierry Vignaud Date: Wed, 18 Feb 2004 22:18:03 +0000 Subject: reindent button packing --- perl-install/standalone/harddrake2 | 26 ++++++++++++++------------ 1 file changed, 14 insertions(+), 12 deletions(-) (limited to 'perl-install') diff --git a/perl-install/standalone/harddrake2 b/perl-install/standalone/harddrake2 index 48dfef856..211e93c70 100755 --- a/perl-install/standalone/harddrake2 +++ b/perl-install/standalone/harddrake2 @@ -176,18 +176,20 @@ $w->{window}->add(gtkpack_(0, Gtk2::VBox->new(0, 0), }) ), ), - 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), - ), - ), - ) - ) - ); + 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), + ), + ), + ) + ) + ); $text->set_wrap_mode('word'); $frame->set_size_request(300, 450) unless $::isEmbedded; -- cgit v1.2.1