summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
Diffstat (limited to 'perl-install')
-rw-r--r--perl-install/install2.pm8
1 files changed, 5 insertions, 3 deletions
diff --git a/perl-install/install2.pm b/perl-install/install2.pm
index 62d68d6b3..4df87e835 100644
--- a/perl-install/install2.pm
+++ b/perl-install/install2.pm
@@ -538,16 +538,18 @@ sub main {
}
$::o = $o = $o_;
- if (-e "/tmp/network") {
+ if (-e '/tmp/network') {
require network;
#- get stage1 network configuration if any.
- $o->{netc} ||= network::read_conf("/tmp/network");
+ log::l('found /tmp/network');
+ $o->{netc} ||= network::read_conf('/tmp/network');
if (my ($file) = glob_('/tmp/ifcfg-*')) {
log::l("found network config file $file");
my $l = network::read_interface_conf($file);
$o->{intf} ||= { $l->{DEVICE} => $l };
}
- if (my ($file) = glob_('/etc/resolv.conf')) {
+ if (-e '/etc/resolv.conf') {
+ my $file ='/etc/resolv.conf';
log::l("found network config file $file");
add2hash($o->{netc}, network::read_resolv_conf($file));
}