diff options
author | Olivier Blin <oblin@mandriva.org> | 2005-09-15 03:29:57 +0000 |
---|---|---|
committer | Olivier Blin <oblin@mandriva.org> | 2005-09-15 03:29:57 +0000 |
commit | 0846262df5150042d38accad44bb805cbc4945b6 (patch) | |
tree | d056db51f2224abcefe5f4732dfedbdcbb7028ee /perl-install/detect_devices.pm | |
parent | ffff9155cd2053d7ec926cc884c413ff6fe7ee5e (diff) | |
download | drakx-0846262df5150042d38accad44bb805cbc4945b6.tar drakx-0846262df5150042d38accad44bb805cbc4945b6.tar.gz drakx-0846262df5150042d38accad44bb805cbc4945b6.tar.bz2 drakx-0846262df5150042d38accad44bb805cbc4945b6.tar.xz drakx-0846262df5150042d38accad44bb805cbc4945b6.zip |
fallback to wpa_cli or iwlist/iwconfig when needed (#18516)
Diffstat (limited to 'perl-install/detect_devices.pm')
-rw-r--r-- | perl-install/detect_devices.pm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/perl-install/detect_devices.pm b/perl-install/detect_devices.pm index 34bddb75d..5d00955d1 100644 --- a/perl-install/detect_devices.pm +++ b/perl-install/detect_devices.pm @@ -587,7 +587,7 @@ sub is_wireless_interface { #- i.e interfaces for which get_wireless_stats() is available c::isNetDeviceWirelessAware($interface) || -e "/sys/class/net/$interface/wireless"; } -sub has_wireless() { any { is_wireless_interface($_) } getNet() } +sub get_wireless_interface() { find { is_wireless_interface($_) } getNet() } sub is_bridge_interface { my ($interface) = @_; @@ -951,7 +951,7 @@ sub matching_type { if ($type =~ /laptop/i) { return isLaptop(); } elsif ($type =~ /wireless/i) { - return has_wireless(); + return to_bool(get_wireless_interface()); } } |