summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2002-07-11 16:43:27 +0000
committerPascal Rigaux <pixel@mandriva.com>2002-07-11 16:43:27 +0000
commit70f2bded3e847293aa07b06987ec3c87c7a9d58f (patch)
tree30a106385945c796ce7049ffcf75462402e535e4 /perl-install
parent77f00a42b5cd8fb087d21b72521f5f8fcde5613a (diff)
downloaddrakx-70f2bded3e847293aa07b06987ec3c87c7a9d58f.tar
drakx-70f2bded3e847293aa07b06987ec3c87c7a9d58f.tar.gz
drakx-70f2bded3e847293aa07b06987ec3c87c7a9d58f.tar.bz2
drakx-70f2bded3e847293aa07b06987ec3c87c7a9d58f.tar.xz
drakx-70f2bded3e847293aa07b06987ec3c87c7a9d58f.zip
remove debugging info that slipped in
Diffstat (limited to 'perl-install')
-rw-r--r--perl-install/detect_devices.pm5
1 files changed, 1 insertions, 4 deletions
diff --git a/perl-install/detect_devices.pm b/perl-install/detect_devices.pm
index c32435b7d..131f57cd8 100644
--- a/perl-install/detect_devices.pm
+++ b/perl-install/detect_devices.pm
@@ -323,16 +323,13 @@ sub pci_probe {
sub usb_probe {
-e "/proc/bus/usb/devices" or return ();
- my @l = add_addons($usbtable_addons, map {
+ add_addons($usbtable_addons, map {
my %l;
@l{qw(vendor id media_type driver description)} = split "\t";
$l{$_} = hex $l{$_} foreach qw(vendor id);
$l{bus} = 'USB';
\%l
} c::usb_probe());
- use Data::Dumper;
- log::l(Dumper \@l, backtrace());
- @l;
}
sub pcmcia_probe {