summaryrefslogtreecommitdiffstats
path: root/perl-install/harddrake
diff options
context:
space:
mode:
Diffstat (limited to 'perl-install/harddrake')
-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 bff9c42f8..21da3c332 100644
--- a/perl-install/harddrake/data.pm
+++ b/perl-install/harddrake/data.pm
@@ -10,7 +10,7 @@ our ($version, $sbindir, $bindir) = ("1.1.5", "/usr/sbin", "/usr/bin");
# Update me each time you handle one more devices class (aka configurator)
sub unknown {
- grep { $_->{media_type} !~ /tape|DISPLAY|MULTIMEDIA_VIDEO|BRIDGE|NETWORK|MULTIMEDIA_AUDIO/ } detect_devices::probeall(1);
+ grep { $_->{media_type} !~ /tape|DISPLAY|MULTIMEDIA_VIDEO|STORAGE_IDE|BRIDGE|NETWORK|MULTIMEDIA_AUDIO/ } detect_devices::probeall(1);
}
@@ -59,9 +59,9 @@ our @tree =
["SCANNER","Scanner", "scanner.png", "$sbindir/scannerdrake",
sub { require scanner; scanner::findScannerUsbport() }],
["MOUSE","Mouse", "hw_mouse.png", "$sbindir/mousedrake", sub { require mouse; &mouse::detect()}],
- ["JOYSTICK","Joystick", "joystick.png", "", sub {}]
+ ["JOYSTICK","Joystick", "joystick.png", "", sub {}],
-# ["","Ideinterface", "Ideinterface.png", "", "STORAGE_IDE"],
+ ["","Ideinterface", "ide_hd.png", "", sub {grep { $_->{media_type} =~ 'STORAGE_IDE' } @devices}],
# ["","Scsiinterface", "Scsiinterface.png", "", \&detect_devices::getSCSI],
# ["","Usbinterface", "Usbinterface.png", "", \&detect_devices::usb_probe]
);