diff options
| author | Pascal Rigaux <pixel@mandriva.com> | 2000-03-24 14:29:56 +0000 |
|---|---|---|
| committer | Pascal Rigaux <pixel@mandriva.com> | 2000-03-24 14:29:56 +0000 |
| commit | f74c3b0afadaa40c9a784321029959a7fffdd0e6 (patch) | |
| tree | 32777c65d09619bfde64fd85ce6f4ab161bddb23 /perl-install/install_steps.pm | |
| parent | ed76955e239d467e996ea3d20e8ae14c13db0253 (diff) | |
| download | drakx-f74c3b0afadaa40c9a784321029959a7fffdd0e6.tar drakx-f74c3b0afadaa40c9a784321029959a7fffdd0e6.tar.gz drakx-f74c3b0afadaa40c9a784321029959a7fffdd0e6.tar.bz2 drakx-f74c3b0afadaa40c9a784321029959a7fffdd0e6.tar.xz drakx-f74c3b0afadaa40c9a784321029959a7fffdd0e6.zip | |
no_comment
Diffstat (limited to 'perl-install/install_steps.pm')
| -rw-r--r-- | perl-install/install_steps.pm | 12 |
1 files changed, 9 insertions, 3 deletions
diff --git a/perl-install/install_steps.pm b/perl-install/install_steps.pm index 7d3b00e03..6ba76b965 100644 --- a/perl-install/install_steps.pm +++ b/perl-install/install_steps.pm @@ -112,7 +112,11 @@ sub selectInstallClass($@) { }}{$o->{installClass}}; } #------------------------------------------------------------------------------ -sub setupSCSI { modules::load_thiskind('scsi') } +sub setupSCSI { + modules::load("ide-mod", 'prereq', 'options="' . detect_devices::hasHPT() . '"'); + modules::load_multi(qw(ide-probe ide-disk ide-cd)); + modules::load_thiskind('scsi'); +} #------------------------------------------------------------------------------ sub doPartitionDisks($$) { my ($o, $hds) = @_; @@ -243,7 +247,7 @@ sub installPackages($$) { #- complete REWORK, TODO and TOCHECK! sub afterInstallPackages($) { my ($o) = @_; - -x "$o->{prefix}/usr/bin/dumpkeys" or die + -x "$o->{prefix}/usr/bin/dumpkeys" or $::testing or die "Some important packages didn't get installed properly. Please switch to console 2 (using ctrl-alt-f2) @@ -742,7 +746,9 @@ sub miscellaneous { $_ .= " " . join(" ", map { "$_=ide-scsi" } @l); } #- keep some given parameters - $_ .= " " . join(" ", grep { /^ide/ } split ' ', cat_("/proc/cmdline")) unless /ide.=/; + if (my $m = modules::get_options("ide-mod")) { + /options="(.*)"/ and $_ .= " $1" if !/ide.=/; + } $o->{bootloader}{perImageAppend} = $_; } |