From 26969281d8784bba5ee723b9989ced87128bd4c5 Mon Sep 17 00:00:00 2001 From: Thierry Vignaud Date: Thu, 8 Jan 2004 15:27:12 +0000 Subject: (configure_net) - make buttons smaller - follow button std order --- perl-install/standalone/drakconnect | 23 ++++++++++++----------- 1 file changed, 12 insertions(+), 11 deletions(-) (limited to 'perl-install') diff --git a/perl-install/standalone/drakconnect b/perl-install/standalone/drakconnect index 58a6696bf..67e38b813 100755 --- a/perl-install/standalone/drakconnect +++ b/perl-install/standalone/drakconnect @@ -586,17 +586,18 @@ Please run \"Internet access\" in control center.")); 5), ), 1, gtkadd(Gtk2::Frame->new(N("Parameters")), $param_vbox), - 0, gtkpack(Gtk2::HBox->new, - gtksignal_connect(Gtk2::Button->new(N("Cancel")), clicked => $exit_dialogsub), - gtksignal_connect(Gtk2::Button->new(N("Ok")), clicked => sub { - each_index { - ${$conf_data[$::i][1]} = $infos[2*$::i+1]->get_text if $_; - } @mask; - update(); - $button_apply->set_sensitive(1); - $exit_dialogsub->(); - }), - ), + 0, gtkpack_(Gtk2::HBox->new, + 0, gtksignal_connect(Gtk2::Button->new(N("Ok")), clicked => sub { + each_index { + ${$conf_data[$::i][1]} = $infos[2*$::i+1]->get_text if $_; + } @mask; + update(); + $button_apply->set_sensitive(1); + $exit_dialogsub->(); + }), + 1, Gtk2::Label->new(""), + 0, gtksignal_connect(Gtk2::Button->new(N("Cancel")), clicked => $exit_dialogsub), + ), ), ); -- cgit v1.2.1