From f2eb42f41d60fbad9150fad5962df90c69713192 Mon Sep 17 00:00:00 2001 From: Pascal Rigaux Date: Thu, 7 Sep 2000 17:53:32 +0000 Subject: no_comment --- perl-install/install_steps.pm | 7 ++++--- 1 file changed, 4 insertions(+), 3 deletions(-) (limited to 'perl-install/install_steps.pm') diff --git a/perl-install/install_steps.pm b/perl-install/install_steps.pm index 8cde0e12b..0b4430b42 100644 --- a/perl-install/install_steps.pm +++ b/perl-install/install_steps.pm @@ -791,9 +791,7 @@ sub configureXAfter { } #------------------------------------------------------------------------------ -# miscellaneousNetwork moved to any -#------------------------------------------------------------------------------ -sub miscellaneous { +sub miscellaneousBefore { my ($o) = @_; my %s = getVarsFromSh("$o->{prefix}/etc/sysconfig/system"); @@ -806,6 +804,9 @@ sub miscellaneous { cat_("/proc/cmdline") =~ /.mem=(\S+)/; #- if /^mem/, it means that's the value grub gave add2hash_($o->{miscellaneous} ||= {}, { numlock => !$o->{pcmcia}, $1 ? (memsize => $1) : () }); +} +sub miscellaneous { + my ($o) = @_; local $_ = $o->{bootloader}{perImageAppend}; if (my $ramsize = $o->{miscellaneous}{memsize} and !/mem=/) { -- cgit v1.2.1