diff options
Diffstat (limited to 'perl-install/standalone/drakconnect')
-rwxr-xr-x | perl-install/standalone/drakconnect | 10 |
1 files changed, 3 insertions, 7 deletions
diff --git a/perl-install/standalone/drakconnect b/perl-install/standalone/drakconnect index 39e6c960b..f1e878be8 100755 --- a/perl-install/standalone/drakconnect +++ b/perl-install/standalone/drakconnect @@ -311,7 +311,7 @@ sub build_notebook { if ($intf->{pages}{'TCP/IP'}) { gtkpack($gui->{sheet}{'TCP/IP'} = Gtk2::HBox->new, gtkadd(gtkcreate_frame(N("IP configuration")), - gtkpack_(my $vbox = Gtk2::VBox->new, + gtkpack_(gtkset_border_width(Gtk2::VBox->new, 5), if_($is_ethernet, 0, gtkpack__(Gtk2::HBox->new, $gui->{intf}{BOOTPROTO} = gtksignal_connect(Gtk2::OptionMenu->new, @@ -357,7 +357,6 @@ sub build_notebook { ), ), ); - $vbox->set_border_width(5); if ($is_ethernet) { my $proto = $gui->{intf}{BOOTPROTO}; @@ -453,7 +452,7 @@ sub build_notebook { if ($interface_kind =~ /^speedtouch|sagem$/) { $gui->{description} = $interface_kind eq 'speedtouch' ? 'Alcatel|USB ADSL Modem (Speed Touch)' : 'Analog Devices Inc.|USB ADSL modem'; } - gtkpack_($gui->{sheet}{Account} = Gtk2::VBox->new, + gtkpack_(gtkset_border_width($gui->{sheet}{Account} = Gtk2::VBox->new, 5), if_($interface eq 'modem', 0, gtkpack(Gtk2::VBox->new(1,0), gtkpack__(Gtk2::HBox->new, Gtk2::Label->new(N("Authentication"))), @@ -471,7 +470,6 @@ sub build_notebook { if_($interface =~ /^(isdn|modem)$/, [ N("Provider phone number"), $1 eq 'modem' ? 'phone' : 'phone_out' ]), ), ); - $gui->{sheet}{Account}->set_border_width(5); my %auth_methods = map_index { $::i => $_ } N("PAP"), N("Terminal-based"), N("Script-based"), N("CHAP"), N("PAP/CHAP"); $gui->{intf}{auth}->set_popdown_strings(values %auth_methods); @@ -480,7 +478,7 @@ sub build_notebook { } if ($intf->{pages}{Modem}) { - gtkpack($gui->{sheet}{Modem} = Gtk2::HBox->new(0,0), + gtkpack(gtkset_border_width($gui->{sheet}{Modem} = Gtk2::HBox->new(0,0), 5), if_($interface eq 'modem', gtkpack__(Gtk2::VBox->new(0,5), (map { (gtkpack(Gtk2::VBox->new(1,0), @@ -542,8 +540,6 @@ sub build_notebook { ), ), ); - $gui->{sheet}{Modem}->set_border_width(5); - $protocol_radio[0]->signal_connect(toggled => sub { $gui->{intf_radio}{protocol} = 2; $apply->() }); $protocol_radio[1]->signal_connect(toggled => sub { $gui->{intf_radio}{protocol} = 3; $apply->() }); $volume_radio[0]->signal_connect(toggled => sub { $gui->{intf_radio}{Volume} = 1; $apply->() }); |