summaryrefslogtreecommitdiffstats
path: root/perl-install/modules.pm
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2000-03-05 22:43:46 +0000
committerPascal Rigaux <pixel@mandriva.com>2000-03-05 22:43:46 +0000
commit26a387d5919bba9ccdb8a8447daa114204a997c4 (patch)
treec76ed77468ddcf8ff471514aa3b0eb2b0ee300c4 /perl-install/modules.pm
parent0bb6afa215fff585416bc88aa967c7e1eb61672e (diff)
downloaddrakx-26a387d5919bba9ccdb8a8447daa114204a997c4.tar
drakx-26a387d5919bba9ccdb8a8447daa114204a997c4.tar.gz
drakx-26a387d5919bba9ccdb8a8447daa114204a997c4.tar.bz2
drakx-26a387d5919bba9ccdb8a8447daa114204a997c4.tar.xz
drakx-26a387d5919bba9ccdb8a8447daa114204a997c4.zip
no_comment
Diffstat (limited to 'perl-install/modules.pm')
-rw-r--r--perl-install/modules.pm8
1 files changed, 4 insertions, 4 deletions
diff --git a/perl-install/modules.pm b/perl-install/modules.pm
index d66b3172b..2727706e5 100644
--- a/perl-install/modules.pm
+++ b/perl-install/modules.pm
@@ -471,10 +471,10 @@ sub write_conf {
my %net = detect_devices::net2module();
while (my ($k, $v) = each %net) { add_alias($k, $v) }
- if (my @scsis = sort grep { $conf{$_}{alias} && /scsi_hostadapter/ } keys %conf) {
- log::l("has scsis ", join " ; ", map { "modprobe $_" } @scsis);
- $conf{supermount}{"post-install"} = join " ; ", map { "modprobe $_" } @scsis;
- }
+ my @l = sort grep { $conf{$_}{alias} && /scsi_hostadapter/ } keys %conf;
+ add_alias('block-major-11', 'scsi_hostadapter');
+ push @l, "ide-floppy" if detect_devices::zips();
+ $conf{supermount}{"post-install"} = join " ; ", map { "modprobe $_" } @l if @l;
local *F;
open F, ">> $file" or die("cannot write module config file $file: $!\n");