From 2ad271d3bbe7c8f709d762428f8d35068e65ff18 Mon Sep 17 00:00:00 2001 From: Olivier Blin Date: Mon, 4 Apr 2005 15:15:08 +0000 Subject: getNet(): only up wireless devices --- perl-install/detect_devices.pm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/perl-install/detect_devices.pm b/perl-install/detect_devices.pm index ce65b2929..df183ebcb 100644 --- a/perl-install/detect_devices.pm +++ b/perl-install/detect_devices.pm @@ -569,9 +569,9 @@ sub getNet() { (map { if_(/^\s*([A-Za-z0-9:\.]*):/, $1) } cat_("/proc/net/dev")), c::get_netdevices(), ); - #- enable all interfaces + #- enable interfaces if get_wireless_stats() is available #- needed for some drivers (Ralink) to be able to detect it is wireless aware - c::enable_net_device($_) foreach @net_devices; + c::enable_net_device($_) foreach grep { -d "/sys/class/net/$_/wireless" } @net_devices; @net_devices; } -- cgit v1.2.1