summaryrefslogtreecommitdiffstats
path: root/perl-install/standalone
diff options
context:
space:
mode:
Diffstat (limited to 'perl-install/standalone')
-rwxr-xr-xperl-install/standalone/bootloader-config13
1 files changed, 13 insertions, 0 deletions
diff --git a/perl-install/standalone/bootloader-config b/perl-install/standalone/bootloader-config
index f9b796fc9..4f53ba420 100755
--- a/perl-install/standalone/bootloader-config
+++ b/perl-install/standalone/bootloader-config
@@ -134,6 +134,8 @@ sub remove_kernel() {
#-###############################################################################
sub add_kernel() {
+ configure_ide_controller();
+ exit;
bootloader::create_link_source();
my $kernel_str = bootloader::vmlinuz2kernel_str($image) or die "bad kernel name $image\n";
@@ -164,6 +166,17 @@ sub add_kernel() {
modify_bootloader();
}
+sub configure_ide_controller {
+ my $modules_conf = modules::any_conf->read;
+ if ($modules_conf->get_alias('ide-controller') ||
+ $modules_conf->get_probeall('ide-controller')) {
+ #- already configured
+ } elsif (my @l = detect_devices::probe_category('disk/ide')) {
+ $modules_conf->add_probeall('ide-controller', $_->{driver}) foreach @l;
+ $modules_conf->write;
+ }
+}
+
sub modify_bootloader() {
!$no_entry or return;