summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
authorThierry Vignaud <tvignaud@mandriva.org>2004-01-26 22:44:39 +0000
committerThierry Vignaud <tvignaud@mandriva.org>2004-01-26 22:44:39 +0000
commit2ce4f907697332a5f71a397226ee1cfa3940fc69 (patch)
tree2a69bcdbcdebea2d1f9cfc74f07c06cae58cd726 /perl-install
parent2cccea0ef55ffba1948788ffd45f35c62c5f0f11 (diff)
downloaddrakx-2ce4f907697332a5f71a397226ee1cfa3940fc69.tar
drakx-2ce4f907697332a5f71a397226ee1cfa3940fc69.tar.gz
drakx-2ce4f907697332a5f71a397226ee1cfa3940fc69.tar.bz2
drakx-2ce4f907697332a5f71a397226ee1cfa3940fc69.tar.xz
drakx-2ce4f907697332a5f71a397226ee1cfa3940fc69.zip
reuse values got from provider db
Diffstat (limited to 'perl-install')
-rw-r--r--perl-install/network/netconnect.pm5
1 files changed, 4 insertions, 1 deletions
diff --git a/perl-install/network/netconnect.pm b/perl-install/network/netconnect.pm
index 971479c7f..531694346 100644
--- a/perl-install/network/netconnect.pm
+++ b/perl-install/network/netconnect.pm
@@ -566,7 +566,10 @@ killall pppd
next => 'adsl_protocol',
post => sub {
$adsl_data = $adsl_data{$adsl_provider};
- $adsl_protocol = $adsl_types{$adsl_data->{method}} if $adsl_provider ne $adsl_old_provider && !defined $adsl_protocol && $adsl_data->{method};
+ if ($adsl_provider ne $adsl_old_provider) {
+ $netc->{$_} = $adsl_data->{$_} foreach qw(dnsServer2 dnsServer3 vpi vci);
+ $adsl_protocol = $adsl_types{$adsl_data->{method}};
+ }
return 'adsl_protocol';
},
},