From a34d347ff739c2c3a275588eea355eac8fe502c9 Mon Sep 17 00:00:00 2001 From: Pascal Rigaux Date: Mon, 23 Oct 2000 15:40:12 +0000 Subject: (floppies, probeall): add require "modules" as it should be --- perl-install/detect_devices.pm | 2 ++ 1 file changed, 2 insertions(+) (limited to 'perl-install/detect_devices.pm') diff --git a/perl-install/detect_devices.pm b/perl-install/detect_devices.pm index 1b8c60440..29356e9b5 100644 --- a/perl-install/detect_devices.pm +++ b/perl-install/detect_devices.pm @@ -59,6 +59,7 @@ sub burners { grep { isBurner($_->{device}) } cdroms() } sub IDEburners { grep { $_->{type} eq 'cdrom' && isBurner($_->{device}) } getIDE() } sub floppies() { + require modules; my @ide = map { $_->{device} } ls120s() and modules::load("ide-floppy"); my @scsi = map { $_->{device} } usbfdus(); (@ide, @scsi, grep { tryOpen($_) } qw(fd0 fd1)); @@ -179,6 +180,7 @@ sub probeall { my ($probe_type) = @_; require pci_probing::main; require sbus_probing::main; + require modules; pci_probing::main::probe($probe_type), sbus_probing::main::probe(), modules::get_pcmcia_devices(); } sub matching_desc { -- cgit v1.2.1