From 1237406e5ee90da9dbdfec9fce21d603f75c80a6 Mon Sep 17 00:00:00 2001 From: Pascal Rigaux Date: Wed, 4 Oct 2000 00:30:29 +0000 Subject: no_comment --- perl-install/modules.pm | 16 +++++++++------- 1 file changed, 9 insertions(+), 7 deletions(-) (limited to 'perl-install/modules.pm') diff --git a/perl-install/modules.pm b/perl-install/modules.pm index 909b09844..5f00af56b 100644 --- a/perl-install/modules.pm +++ b/perl-install/modules.pm @@ -408,7 +408,7 @@ sub remove_alias($) { sub when_load { my ($name, $type, @options) = @_; - if ($type =~ /scsi/ || $type eq $type_aliases{scsi}) { + if ($type =~ /\bscsi\b/ || $type eq $type_aliases{scsi}) { add_alias('scsi_hostadapter', $name), eval { load('sd_mod') }; } $conf{$name}{options} = join " ", @options if @options; @@ -612,13 +612,15 @@ sub get_that_type { } sub load_ide { - return; #- add it back to support Ultra66 on ide modules. - eval { - load("ide-mod", 'prereq', 'options="' . detect_devices::hasUltra66() . '"'); - delete $conf{"ide-mod"}{options}; - load_multi(qw(ide-probe ide-probe-mod ide-disk ide-cd)); + if (1) { #- add it back to support Ultra66 on ide modules. + load("ide-cd"); + } else { + eval { + load("ide-mod", 'prereq', 'options="' . detect_devices::hasUltra66() . '"'); + delete $conf{"ide-mod"}{options}; + load_multi(qw(ide-probe ide-probe-mod ide-disk ide-cd)); + } } - } sub configure_pcmcia { -- cgit v1.2.1