From 80b73550aa06653abdbeddf84445040629954afd Mon Sep 17 00:00:00 2001 From: Guillaume Cottenceau Date: Thu, 21 Sep 2000 16:54:00 +0000 Subject: really remove plip in standalone --- perl-install/detect_devices.pm | 5 +++-- 1 file changed, 3 insertions(+), 2 deletions(-) (limited to 'perl-install/detect_devices.pm') diff --git a/perl-install/detect_devices.pm b/perl-install/detect_devices.pm index be6ba24d6..dc9f17de2 100644 --- a/perl-install/detect_devices.pm +++ b/perl-install/detect_devices.pm @@ -14,7 +14,7 @@ use c; #-##################################################################################### #- Globals #-##################################################################################### -my @netdevices = map { my $l = $_; map { "$l$_" } (0..3) } (qw(eth tr fddi), $::isStandalone ? () : 'plip'); +my @netdevices = map { my $l = $_; map { "$l$_" } (0..3) } qw(eth tr fddi plip); my %serialprobe = (); my $usb_interface = undef; @@ -167,7 +167,8 @@ sub getDAC960() { } sub getNet() { - grep { hasNetDevice($_) } @netdevices; + my @nets = grep { hasNetDevice($_) } @netdevices; + $::isStandalone ? grep { !/plip/ } @nets : @nets; } sub hasNet() { goto &getNet } -- cgit v1.2.1