diff options
author | Thierry Vignaud <tvignaud@mandriva.org> | 2004-02-23 10:17:06 +0000 |
---|---|---|
committer | Thierry Vignaud <tvignaud@mandriva.org> | 2004-02-23 10:17:06 +0000 |
commit | e9c960eb3e47e4921f9c8daa8a3b22adfad35d78 (patch) | |
tree | ce276b1c2c2c683efe9384ee4b4bb629603b37e0 /perl-install | |
parent | 5ed389cf6426eaf0d2d6892bfa67896ab8459705 (diff) | |
download | drakx-e9c960eb3e47e4921f9c8daa8a3b22adfad35d78.tar drakx-e9c960eb3e47e4921f9c8daa8a3b22adfad35d78.tar.gz drakx-e9c960eb3e47e4921f9c8daa8a3b22adfad35d78.tar.bz2 drakx-e9c960eb3e47e4921f9c8daa8a3b22adfad35d78.tar.xz drakx-e9c960eb3e47e4921f9c8daa8a3b22adfad35d78.zip |
fix ability to set ip parameters broken by localizing bootproto
Diffstat (limited to 'perl-install')
-rwxr-xr-x | perl-install/standalone/drakconnect | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/perl-install/standalone/drakconnect b/perl-install/standalone/drakconnect index 1e88c63b6..c73a56aa3 100755 --- a/perl-install/standalone/drakconnect +++ b/perl-install/standalone/drakconnect @@ -295,8 +295,11 @@ sub build_notebook { if_($is_ethernet, 0, $gui->{intf}{BOOTPROTO} = gtksignal_connect(Gtk2::OptionMenu->new, changed => sub { + my $proto = $gui->{intf}{BOOTPROTO}; + my $protocol = $intf->{BOOTPROTO} = { reverse %{$proto->{protocols}} }->{$proto->get_text}; + foreach ($gui->{intf}{IPADDR}, $gui->{intf}{NETMASK}, $gui->{netc}{GATEWAY}) { - $_->set_sensitive($gui->{intf}{BOOTPROTO}->get_text eq "static" ? 1 : 0) + $_->set_sensitive($protocol eq "static" ? 1 : 0) }; $apply->() }, ), ), |