summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
authorOlivier Blin <oblin@mandriva.org>2005-08-03 05:54:37 +0000
committerOlivier Blin <oblin@mandriva.org>2005-08-03 05:54:37 +0000
commit022c8469993fdb4e53032e16cf7b8f72e94db669 (patch)
tree639b18a0369a747e59cbf6b22b1b0c1f0eb3881d /perl-install
parent0dfac417904576df46f095e4f5bb7aaaf10c7614 (diff)
downloaddrakx-backup-do-not-use-022c8469993fdb4e53032e16cf7b8f72e94db669.tar
drakx-backup-do-not-use-022c8469993fdb4e53032e16cf7b8f72e94db669.tar.gz
drakx-backup-do-not-use-022c8469993fdb4e53032e16cf7b8f72e94db669.tar.bz2
drakx-backup-do-not-use-022c8469993fdb4e53032e16cf7b8f72e94db669.tar.xz
drakx-backup-do-not-use-022c8469993fdb4e53032e16cf7b8f72e94db669.zip
apply gateway modifications (#17260)
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 2f2f7d78b..0c1ff1d7f 100755
--- a/perl-install/standalone/drakconnect
+++ b/perl-install/standalone/drakconnect
@@ -640,6 +640,7 @@ sub save {
Glib::Timeout->add(200, sub {
gtkflush();
+ delete $net->{network}{GATEWAY};
foreach (keys %$p) {
save_notebook($p->{$_}{intf}, $p->{$_}{gui}) or return;
$p->{$_}{intf}{save} and $p->{$_}{intf}{save}->();
@@ -658,7 +659,9 @@ sub save {
sub save_notebook {
my ($intf, $gui) = @_;
- $net->{$_} = $gui->{network}{$_}->get_text foreach keys %{$gui->{network}};
+ if ($gui->{network}{GATEWAY}->is_sensitive && $gui->{network}{GATEWAY}->get_text) {
+ $net->{network}{GATEWAY} = $gui->{network}{GATEWAY}->get_text;
+ }
$gui->{intf}{$_} and $intf->{$_} = $gui->{intf}{$_}->get_text foreach keys %{$gui->{intf}};
$gui->{intf_radio}{$_} and $intf->{$_} = $gui->{intf_radio}{$_} foreach keys %{$gui->{intf_radio}};
$intf->{$_} = bool2yesno($gui->{intf_bool}{$_}->get_active) foreach keys %{$gui->{intf_bool}};