diff options
| -rw-r--r-- | perl-install/network/netconnect.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/network/netconnect.pm b/perl-install/network/netconnect.pm index 6ae45a5d3..a7ce9a755 100644 --- a/perl-install/network/netconnect.pm +++ b/perl-install/network/netconnect.pm @@ -644,7 +644,7 @@ If you don't know, choose 'use pppoe'"), }, ], post => sub { - my $adsl_type = find { $adsl_types{$_} eq $adsl_protocol } keys %adsl_types; + $adsl_type = find { $adsl_types{$_} eq $adsl_protocol } keys %adsl_types; if ($adsl_type eq 'dhcp') { $auto_ip = 1; return 'lan_intf'; |