summaryrefslogtreecommitdiffstats
path: root/perl-install/network/ethernet.pm
diff options
context:
space:
mode:
Diffstat (limited to 'perl-install/network/ethernet.pm')
-rw-r--r--perl-install/network/ethernet.pm7
1 files changed, 4 insertions, 3 deletions
diff --git a/perl-install/network/ethernet.pm b/perl-install/network/ethernet.pm
index 9528a9ed9..9dc6d9b1c 100644
--- a/perl-install/network/ethernet.pm
+++ b/perl-install/network/ethernet.pm
@@ -132,7 +132,7 @@ sub conf_network_card_backend {
my $saved_driver;
return map {
my $interface = $_;
- my $interface_state = `LC_ALL=C LANG=C LANGUAGE=C LC_MESSAGES=C /sbin/ifconfig "$interface"`;
+ my $interface_state = `LC_ALL=C LANG=C LANGUAGE=C LC_MESSAGES=C $prefix/sbin/ifconfig "$interface"`;
my $a = modules::get_alias($interface);
my $b;
foreach (@devs) {
@@ -140,8 +140,9 @@ sub conf_network_card_backend {
}
$a ||= $b;
$a and $saved_driver = $a;
- if_($interface_state =~ /inet addr|Bcast|Mask|Interrupt|Base address/ && $a, [$interface, $saved_driver]);
- } @all_cards, @unconfigured_interfaces;
+ if_($::isInstall || $interface_state =~ /inet addr|Bcast|Mask|Interrupt|Base address/ && $a,
+ [$interface, $saved_driver]);
+ } @all_cards;
}
$interface =~ /eth[0-9]+/ or die("the interface is not an ethx");