diff options
Diffstat (limited to 'perl-install/standalone/drakgw')
| -rwxr-xr-x | perl-install/standalone/drakgw | 14 |
1 files changed, 8 insertions, 6 deletions
diff --git a/perl-install/standalone/drakgw b/perl-install/standalone/drakgw index 0a6fe6805..81841214c 100755 --- a/perl-install/standalone/drakgw +++ b/perl-install/standalone/drakgw @@ -615,17 +615,16 @@ Click on Configure to launch the setup wizard.", $setup_state)); my $bbox1 = new Gtk::HButtonBox; $vbox1->pack_start($bbox1,0,0,0); $bbox1->set_layout(-end); - my $button_cancel = new Gtk::Button _("Cancel"); - $button_cancel->signal_connect ( clicked => sub { - kill(USR1, $::CCPID); - }); - $bbox1->add($button_cancel); my $button_conf = new Gtk::Button _("Configure"); $button_conf->signal_connect ( clicked => sub { system("/usr/sbin/drakgw --wizard"); }); $bbox1->add($button_conf); - + my $button_cancel = new Gtk::Button _("Cancel"); + $button_cancel->signal_connect ( clicked => sub { + kill(USR1, $::CCPID); + }); + $bbox1->add($button_cancel); $window1->show_all(); Gtk->main_iteration while Gtk->events_pending; $::isEmbedded and kill USR2, $::CCPID; @@ -641,6 +640,9 @@ Click on Configure to launch the setup wizard.", $setup_state)); #------------------------------------------------- #- $Log$ +#- Revision 1.34 2001/04/06 15:09:15 yduret +#- swap cancel/configure button +#- #- Revision 1.33 2001/04/06 14:12:06 gc #- - correct yvounetification in i18n stuff #- - remove some remaining debugging printings |