diff options
Diffstat (limited to 'perl-install/install_steps.pm')
| -rw-r--r-- | perl-install/install_steps.pm | 7 |
1 files changed, 4 insertions, 3 deletions
diff --git a/perl-install/install_steps.pm b/perl-install/install_steps.pm index 991b4f8c6..f562cb272 100644 --- a/perl-install/install_steps.pm +++ b/perl-install/install_steps.pm @@ -584,6 +584,7 @@ sub configureNetwork { my ($o) = @_; require network; network::configureNetwork2($o, $o->{prefix}, $o->{netc}, $o->{intf}); + $o->{netcnx} ||= 'lan'; } #------------------------------------------------------------------------------ @@ -939,7 +940,7 @@ sub exitInstall { #------------------------------------------------------------------------------ sub hasNetwork { my ($o) = @_; - $o->{netcnx}{internet_cnx_choice} && $o->{netc}{NETWORKING} ne 'no' + $o->{netcnx}{type} && $o->{netc}{NETWORKING} ne 'no' } #------------------------------------------------------------------------------ @@ -950,7 +951,7 @@ sub upNetwork { modules::write_conf($o->{prefix}); if (hasNetwork($o)) { - if ($o->{netc}{internet_cnx_choice} =~ /adsl|network|cable/) { + if ($o->{netcnx}{type} =~ /adsl|lan|cable/) { require network::netconnect; network::netconnect::start_internet($o); return 1; @@ -971,7 +972,7 @@ sub downNetwork { modules::write_conf($o->{prefix}); if (hasNetwork($o)) { - if (!$pppOnly && $o->{netc}{internet_cnx_choice} =~ /adsl|network|cable/) { + if (!$pppOnly && $o->{netc}{type} =~ /adsl|lan|cable/) { require network::netconnect; network::netconnect::stop_internet($o); return 1; |