summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
authorThierry Vignaud <tvignaud@mandriva.org>2004-02-23 10:17:06 +0000
committerThierry Vignaud <tvignaud@mandriva.org>2004-02-23 10:17:06 +0000
commite9c960eb3e47e4921f9c8daa8a3b22adfad35d78 (patch)
treece276b1c2c2c683efe9384ee4b4bb629603b37e0 /perl-install
parent5ed389cf6426eaf0d2d6892bfa67896ab8459705 (diff)
downloaddrakx-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-xperl-install/standalone/drakconnect5
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->() },
),
),