From 8375abebba0f0a82fff946ab65db1b5673688040 Mon Sep 17 00:00:00 2001 From: Thierry Vignaud Date: Mon, 1 Mar 2004 13:50:18 +0000 Subject: (upNetwork) log up try and faillures --- perl-install/install_steps.pm | 4 ++++ 1 file changed, 4 insertions(+) (limited to 'perl-install/install_steps.pm') diff --git a/perl-install/install_steps.pm b/perl-install/install_steps.pm index 5c931ca8a..58bc58ca2 100644 --- a/perl-install/install_steps.pm +++ b/perl-install/install_steps.pm @@ -982,15 +982,19 @@ sub upNetwork { modules::write_conf(); if (hasNetwork($o)) { if ($o->{netcnx}{type} =~ /adsl|lan|cable/) { + log::l("starting network ($o->{netcnx}{type})"); require network::netconnect; network::netconnect::start_internet($o); return 1; } elsif (!$b_pppAvoided) { + log::l("starting network (ppp: $o->{netcnx}{type})"); eval { modules::load(qw(serial ppp bsd_comp ppp_deflate)) }; run_program::rooted($o->{prefix}, "/etc/rc.d/init.d/syslog", "start"); require network::netconnect; network::netconnect::start_internet($o); return 1; + } else { + log::l(qq(not starting network (b/c ppp avoided and type is "$o->{netcnx}{type})")); } } $::testing; -- cgit v1.2.1