From 08cf2082294638623da886adbbad631cec24ec4f Mon Sep 17 00:00:00 2001 From: Pascal Rigaux Date: Fri, 27 May 2005 05:08:48 +0000 Subject: remove unused and obsolete code --- perl-install/install_steps.pm | 5 ----- 1 file changed, 5 deletions(-) (limited to 'perl-install') diff --git a/perl-install/install_steps.pm b/perl-install/install_steps.pm index 94a819c00..2b42a7237 100644 --- a/perl-install/install_steps.pm +++ b/perl-install/install_steps.pm @@ -812,9 +812,6 @@ sub setupBootloaderBefore { @$dict = grep { $_->[1] ne 'ide-scsi' } @$dict; }); - if ($o->{miscellaneous}{HDPARM}) { - bootloader::set_append_with_key($o->{bootloader}, $_, 'autotune') foreach grep { /ide/ } all("/proc/ide"); - } if (cat_("/proc/cmdline") =~ /mem=nopentium/) { bootloader::set_append_with_key($o->{bootloader}, mem => 'nopentium'); } @@ -913,8 +910,6 @@ sub configureXAfter { sub miscellaneousBefore { my ($o) = @_; - my %s = getVarsFromSh("$o->{prefix}/etc/sysconfig/system"); - $o->{miscellaneous}{HDPARM} = $s{HDPARM} if exists $s{HDPARM}; require security::level; require security::various; $o->{security} ||= security::level::get(); -- cgit v1.2.1