From 842972c81bbb4b8a77329426dc2116045184f616 Mon Sep 17 00:00:00 2001 From: Olivier Blin Date: Tue, 5 Apr 2005 18:08:47 +0000 Subject: detect more devices (e.g. wireless) --- perl-install/standalone/net_monitor | 5 +++-- 1 file changed, 3 insertions(+), 2 deletions(-) (limited to 'perl-install/standalone/net_monitor') diff --git a/perl-install/standalone/net_monitor b/perl-install/standalone/net_monitor index 7124c8a84..f82ed8b3c 100755 --- a/perl-install/standalone/net_monitor +++ b/perl-install/standalone/net_monitor @@ -323,11 +323,12 @@ sub get_val() { $a =~ s/^.*?\n.*?\n//; $a =~ s/^\s*lo:.*?\n//; my @line = split(/\n/, $a); - my @interfaces = c::get_netdevices(); + require detect_devices; + my @net_devices = detect_devices::getNet(); map { s/\s*(\w*)://; my $intf = $1; - if (member($intf, @interfaces)) { + if (member($intf, @net_devices)) { $monitor->{$intf}{val} = [ split() ]; $monitor->{$intf}{intf} = $intf; $intf; -- cgit v1.2.1