From 117af841e3338899d2c5f9d84abb7e8c4c322614 Mon Sep 17 00:00:00 2001 From: Pascal Rigaux Date: Mon, 1 Mar 2004 14:39:02 +0000 Subject: remove existing xxx=ide-scsi on upgrades --- perl-install/install_steps.pm | 7 +++++++ 1 file changed, 7 insertions(+) diff --git a/perl-install/install_steps.pm b/perl-install/install_steps.pm index 58bc58ca2..592d4073d 100644 --- a/perl-install/install_steps.pm +++ b/perl-install/install_steps.pm @@ -803,6 +803,13 @@ sub setupBootloaderBefore { my ($o) = @_; require bootloader; + + #- remove previous ide-scsi lines + bootloader::modify_append($o->{bootloader}, sub { + my ($_simple, $dict) = @_; + @$dict = grep { $_->[1] ne 'ide-scsi' } @$dict; + }); + if ($o->{miscellaneous}{HDPARM}) { bootloader::set_append($o->{bootloader}, $_, 'autotune') foreach grep { /ide/ } all("/proc/ide"); } -- cgit v1.2.1