summaryrefslogtreecommitdiffstats
path: root/perl-install/standalone/drakconnect
diff options
context:
space:
mode:
authorDamien Chaumette <dchaumette@mandriva.com>2004-01-22 10:51:08 +0000
committerDamien Chaumette <dchaumette@mandriva.com>2004-01-22 10:51:08 +0000
commitd71419c3bf83c946f5707fe709477cce68248a0f (patch)
treed05e312a495f2281fcb6e99057f75a3aa6df2a4a /perl-install/standalone/drakconnect
parent3915d413afb86a6eec133bb90f155e327b49f826 (diff)
downloaddrakx-backup-do-not-use-d71419c3bf83c946f5707fe709477cce68248a0f.tar
drakx-backup-do-not-use-d71419c3bf83c946f5707fe709477cce68248a0f.tar.gz
drakx-backup-do-not-use-d71419c3bf83c946f5707fe709477cce68248a0f.tar.bz2
drakx-backup-do-not-use-d71419c3bf83c946f5707fe709477cce68248a0f.tar.xz
drakx-backup-do-not-use-d71419c3bf83c946f5707fe709477cce68248a0f.zip
fix broken MII_NOT_SUPPORTED and HWADDR
Diffstat (limited to 'perl-install/standalone/drakconnect')
-rwxr-xr-xperl-install/standalone/drakconnect8
1 files changed, 6 insertions, 2 deletions
diff --git a/perl-install/standalone/drakconnect b/perl-install/standalone/drakconnect
index b78ce4479..b8058e44c 100755
--- a/perl-install/standalone/drakconnect
+++ b/perl-install/standalone/drakconnect
@@ -406,7 +406,9 @@ sub build_notebook {
$dialing_mode_radio[1]->signal_connect('toggled' => sub { $gui->{cnx}{dialing_mode_radio} = 'static'; $apply->() });
$speed_radio[0]->signal_connect('toggled' => sub { $gui->{cnx}{speed_radio} = '64'; $apply->() });
$speed_radio[1]->signal_connect('toggled' => sub { $gui->{cnx}{speed_radio} = '128'; $apply->() });
- $gui->{intf_bool}{$_}->set_active($intf->{$_} eq 'yes' ? 1 : 0) foreach keys %{$gui->{intf_bool}};
+ $gui->{intf_bool}{ONBOOT}->set_active($intf->{ONBOOT} eq 'yes' ? 1 : 0);
+ $gui->{intf_bool}{MII_NOT_SUPPORTED}->set_active($intf->{MII_NOT_SUPPORTED} eq 'no' ? 1 : 0);
+ $gui->{intf_bool}{HWADDR}->set_active($intf->{HWADDR});
}
if ($intf->{pages}{Account}) {
@@ -508,9 +510,11 @@ sub save {
sub save_notebook {
my ($netc, $intf, $gui) = @_;
+ $netc->{$_} = $gui->{netc}{$_}->get_text foreach keys %{$gui->{netc}};
$intf->{$_} = $gui->{intf}{$_}->get_text foreach keys %{$gui->{intf}};
$intf->{$_} = bool2yesno($gui->{intf_bool}{$_}->get_active) foreach keys %{$gui->{intf_bool}};
- $netc->{$_} = $gui->{netc}{$_}->get_text foreach keys %{$gui->{netc}};
+ $intf->{MII_NOT_SUPPORTED} and $intf->{MII_NOT_SUPPORTED} = bool2yesno(!$gui->{intf_bool}{MII_NOT_SUPPORTED}->get_active);
+ $gui->{intf_bool}{HWADDR} and (bool2yesno($gui->{intf_bool}{HWADDR}->get_active) eq 'yes' ? ($intf->{HWADDR} = 'yes') : delete $intf->{HWADDR});
}
sub add_intf() {