diff options
Diffstat (limited to 'perl-install')
-rw-r--r-- | perl-install/harddrake/data.pm | 6 |
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], |