From c60b796a26ac6510d4089bdfdc3ae92f206ca382 Mon Sep 17 00:00:00 2001 From: Pascal Rigaux Date: Wed, 17 Jul 2002 12:39:48 +0000 Subject: move the "if !$::testing" for not modifying inittab in function runlevel() (was in install_steps.pm) --- perl-install/any.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'perl-install') diff --git a/perl-install/any.pm b/perl-install/any.pm index ce092155d..69519938d 100644 --- a/perl-install/any.pm +++ b/perl-install/any.pm @@ -903,7 +903,7 @@ sub runlevel { my $f = "$prefix/etc/inittab"; -r $f or log::l("missing inittab!!!"), return; if ($runlevel) { - substInFile { s/^id:\d:initdefault:\s*$/id:$runlevel:initdefault:\n/ } $f; + substInFile { s/^id:\d:initdefault:\s*$/id:$runlevel:initdefault:\n/ } $f if !$::testing; } else { cat_($f) =~ /^id:(\d):initdefault:\s*$/ && $1; } -- cgit v1.2.1