From 0c6d74ba0f83b735c2c5f69a21e6de3772ca5282 Mon Sep 17 00:00:00 2001 From: Thierry Vignaud Date: Wed, 19 May 2004 15:24:55 +0000 Subject: filter LAN and Wireless cards by explicitely checking whether network interfaces support wireless extensions or not instead of relying on both ethtool support (in order to get the module name) and checking against a whitelist of known wireless awere cards --- perl-install/network/netconnect.pm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'perl-install/network') diff --git a/perl-install/network/netconnect.pm b/perl-install/network/netconnect.pm index 2e1dd5908..eeba931d0 100644 --- a/perl-install/network/netconnect.pm +++ b/perl-install/network/netconnect.pm @@ -130,8 +130,8 @@ sub real_main { @all_cards = network::ethernet::get_eth_cards(); %eth_intf = network::ethernet::get_eth_cards_names(@all_cards); require list_modules; - my @wmodules = list_modules::category2modules('network/wireless'); - %eth_intf = map { $_->[0] => join(': ', $_->[0], $_->[2]) } grep { int(!$is_wireless) ^ member($_->[1], @wmodules) } @all_cards; + %eth_intf = map { $_->[0] => join(': ', $_->[0], $_->[2]) } + grep { $is_wireless ^ !c::isNetDeviceWirelessAware($_->[0]) } @all_cards; }; my $find_lan_module = sub { -- cgit v1.2.1