summaryrefslogtreecommitdiffstats
path: root/perl-install/detect_devices.pm
diff options
context:
space:
mode:
authorOlivier Blin <oblin@mandriva.org>2005-03-21 17:26:25 +0000
committerOlivier Blin <oblin@mandriva.org>2005-03-21 17:26:25 +0000
commit98899f018f7e6394dd0648bed57c2f8bd49cd6e5 (patch)
tree64c6bfca402fc5249f82896f2eb101cee3128178 /perl-install/detect_devices.pm
parent2b68b3a19443c3b77dd1327a8d3b250f0416df25 (diff)
downloaddrakx-98899f018f7e6394dd0648bed57c2f8bd49cd6e5.tar
drakx-98899f018f7e6394dd0648bed57c2f8bd49cd6e5.tar.gz
drakx-98899f018f7e6394dd0648bed57c2f8bd49cd6e5.tar.bz2
drakx-98899f018f7e6394dd0648bed57c2f8bd49cd6e5.tar.xz
drakx-98899f018f7e6394dd0648bed57c2f8bd49cd6e5.zip
handle wireless hardware type
Diffstat (limited to 'perl-install/detect_devices.pm')
-rw-r--r--perl-install/detect_devices.pm6
1 files changed, 5 insertions, 1 deletions
diff --git a/perl-install/detect_devices.pm b/perl-install/detect_devices.pm
index 94a092824..3bbcfc8a3 100644
--- a/perl-install/detect_devices.pm
+++ b/perl-install/detect_devices.pm
@@ -870,7 +870,11 @@ sub has_cpu_flag {
sub matching_type {
my ($type) = @_;
- $type =~ /laptop/i && isLaptop();
+ if ($type =~ /laptop/i) {
+ return isLaptop();
+ } elsif ($type =~ /wireless/i) {
+ return any { c::isNetDeviceWirelessAware($_) } getNet();
+ }
}
sub usbMice() { grep { $_->{media_type} =~ /\|Mouse/ && $_->{driver} !~ /wacom/ ||