diff options
| -rw-r--r-- | perl-install/network/netconnect.pm | 5 |
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'; }, }, |