summaryrefslogtreecommitdiffstats
path: root/perl-install/harddrake/data.pm
diff options
context:
space:
mode:
authorThierry Vignaud <tvignaud@mandriva.org>2002-07-25 20:07:48 +0000
committerThierry Vignaud <tvignaud@mandriva.org>2002-07-25 20:07:48 +0000
commit50d7dab85114fb42f83f7cd7d4fa7c5f22c282b5 (patch)
treec85b70d9c918bb52705861f6cc4a35fc255fe172 /perl-install/harddrake/data.pm
parentf0478464cd7233e8b103a3a0625fbf381f5ab405 (diff)
downloaddrakx-backup-do-not-use-50d7dab85114fb42f83f7cd7d4fa7c5f22c282b5.tar
drakx-backup-do-not-use-50d7dab85114fb42f83f7cd7d4fa7c5f22c282b5.tar.gz
drakx-backup-do-not-use-50d7dab85114fb42f83f7cd7d4fa7c5f22c282b5.tar.bz2
drakx-backup-do-not-use-50d7dab85114fb42f83f7cd7d4fa7c5f22c282b5.tar.xz
drakx-backup-do-not-use-50d7dab85114fb42f83f7cd7d4fa7c5f22c282b5.zip
only do one probeall here (there's still many in detect_devices,
probing caching should go there)
Diffstat (limited to 'perl-install/harddrake/data.pm')
-rw-r--r--perl-install/harddrake/data.pm6
1 files changed, 3 insertions, 3 deletions
diff --git a/perl-install/harddrake/data.pm b/perl-install/harddrake/data.pm
index 970299d76..24df932d9 100644
--- a/perl-install/harddrake/data.pm
+++ b/perl-install/harddrake/data.pm
@@ -8,9 +8,11 @@ use class_discard;
our (@ISA, @EXPORT_OK) = (qw(Exporter), (qw(version tree)));
our ($version, $sbindir, $bindir) = ("1.1.6", "/usr/sbin", "/usr/bin");
+my @devices = detect_devices::probeall(1);
+
# Update me each time you handle one more devices class (aka configurator)
sub unknown {
- grep { ($_->{media_type} !~ /tape|SERIAL_(USB|SMBUS)|Printer|DISPLAY|MULTIMEDIA_(VIDEO|AUDIO|OTHER)|STORAGE_IDE|BRIDGE|NETWORK/) && ($_->{driver} ne 'scanner') } detect_devices::probeall(1);
+ grep { ($_->{media_type} !~ /tape|SERIAL_(USB|SMBUS)|Printer|DISPLAY|MULTIMEDIA_(VIDEO|AUDIO|OTHER)|STORAGE_IDE|BRIDGE|NETWORK/) && ($_->{driver} ne 'scanner') } @devices;
}
@@ -18,8 +20,6 @@ sub unknown {
# NEVER, NEVER alter CLASS_ID or you'll harddrake2 service to detect changes
# in hw configuration ... :-(
-my @devices = detect_devices::probeall(1);
-
our @tree =
(
["FLOPPY","Floppy", "floppy.png", "",\&detect_devices::floppies],