From 2ce4f907697332a5f71a397226ee1cfa3940fc69 Mon Sep 17 00:00:00 2001
From: Thierry Vignaud <tvignaud@mandriva.org>
Date: Mon, 26 Jan 2004 22:44:39 +0000
Subject: reuse values got from provider db
---
perl-install/network/netconnect.pm | 5 ++++-
1 file changed, 4 insertions(+), 1 deletion(-)
(limited to 'perl-install')
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';
},
},
--
cgit v1.2.1