diff options
Diffstat (limited to 'perl-install/modules.pm')
| -rw-r--r-- | perl-install/modules.pm | 8 |
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"); |