summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
authorFrancois Pons <fpons@mandriva.com>2000-05-23 12:39:23 +0000
committerFrancois Pons <fpons@mandriva.com>2000-05-23 12:39:23 +0000
commit3304416733c86c40f897dfb4ab514b27d7f55e17 (patch)
tree56371ec5bccb5fb3938d99baad872b995a197419 /perl-install
parentf5b64c37005cb2aa89563efe7f4d965c0a1d7440 (diff)
downloaddrakx-3304416733c86c40f897dfb4ab514b27d7f55e17.tar
drakx-3304416733c86c40f897dfb4ab514b27d7f55e17.tar.gz
drakx-3304416733c86c40f897dfb4ab514b27d7f55e17.tar.bz2
drakx-3304416733c86c40f897dfb4ab514b27d7f55e17.tar.xz
drakx-3304416733c86c40f897dfb4ab514b27d7f55e17.zip
*** empty log message ***
Diffstat (limited to 'perl-install')
-rw-r--r--perl-install/detect_devices.pm3
1 files changed, 2 insertions, 1 deletions
diff --git a/perl-install/detect_devices.pm b/perl-install/detect_devices.pm
index 26a476c17..eedaa33fd 100644
--- a/perl-install/detect_devices.pm
+++ b/perl-install/detect_devices.pm
@@ -254,7 +254,8 @@ sub probeUSB {
require pci_probing::main;
require modules;
defined($usb_interface) and return $usb_interface;
- if (arch() !~ /sparc|alpha/ && ($usb_interface) = grep { /usb-/ } map { $_->[1] } pci_probing::main::probe('')) {
+ arch() =~ /sparc|alpha/ and return $usb_interface = '';
+ if (($usb_interface) = grep { /usb-/ } map { $_->[1] } pci_probing::main::probe('')) {
eval { modules::load($usb_interface, "SERIAL_USB") };
if ($@) {
$usb_interface = '';