From 3304416733c86c40f897dfb4ab514b27d7f55e17 Mon Sep 17 00:00:00 2001 From: Francois Pons Date: Tue, 23 May 2000 12:39:23 +0000 Subject: *** empty log message *** --- perl-install/detect_devices.pm | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) (limited to 'perl-install') 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 = ''; -- cgit v1.2.1