summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
authorFrancois Pons <fpons@mandriva.com>2002-03-05 16:07:20 +0000
committerFrancois Pons <fpons@mandriva.com>2002-03-05 16:07:20 +0000
commit968684ae56afe97cb8f50a82993cc7342eb3a9fb (patch)
treeec9ce029de0a74b808bdece8ef927f1422f22fce /perl-install
parenta6563425e269ef49ac2e839b00984ec83f788ec4 (diff)
downloaddrakx-968684ae56afe97cb8f50a82993cc7342eb3a9fb.tar
drakx-968684ae56afe97cb8f50a82993cc7342eb3a9fb.tar.gz
drakx-968684ae56afe97cb8f50a82993cc7342eb3a9fb.tar.bz2
drakx-968684ae56afe97cb8f50a82993cc7342eb3a9fb.tar.xz
drakx-968684ae56afe97cb8f50a82993cc7342eb3a9fb.zip
added log for hasNetwork (so that we can understand why installUpdates do nothing).
Diffstat (limited to 'perl-install')
-rw-r--r--perl-install/install_steps.pm4
1 files changed, 3 insertions, 1 deletions
diff --git a/perl-install/install_steps.pm b/perl-install/install_steps.pm
index a4e1ec509..3864f8a06 100644
--- a/perl-install/install_steps.pm
+++ b/perl-install/install_steps.pm
@@ -975,7 +975,9 @@ risk!
#------------------------------------------------------------------------------
sub hasNetwork {
my ($o) = @_;
- $o->{netcnx}{type} && $o->{netc}{NETWORKING} ne 'no'
+ $o->{netcnx}{type} && $o->{netc}{NETWORKING} ne 'no' and return 1;
+ log::l("no network seems to be configured for internet ($o->{netcnx}{type},$o->{netc}{NETWORKING})");
+ 0;
}
#------------------------------------------------------------------------------