summaryrefslogtreecommitdiffstats
path: root/perl-install/any.pm
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2002-07-17 12:39:48 +0000
committerPascal Rigaux <pixel@mandriva.com>2002-07-17 12:39:48 +0000
commitc60b796a26ac6510d4089bdfdc3ae92f206ca382 (patch)
tree5602b0837f4856620cba477dc7081bb6ea265944 /perl-install/any.pm
parentc7ffa07e9041686977a2dfc89bba35c01617097d (diff)
downloaddrakx-c60b796a26ac6510d4089bdfdc3ae92f206ca382.tar
drakx-c60b796a26ac6510d4089bdfdc3ae92f206ca382.tar.gz
drakx-c60b796a26ac6510d4089bdfdc3ae92f206ca382.tar.bz2
drakx-c60b796a26ac6510d4089bdfdc3ae92f206ca382.tar.xz
drakx-c60b796a26ac6510d4089bdfdc3ae92f206ca382.zip
move the "if !$::testing" for not modifying inittab in function runlevel()
(was in install_steps.pm)
Diffstat (limited to 'perl-install/any.pm')
-rw-r--r--perl-install/any.pm2
1 files changed, 1 insertions, 1 deletions
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;
}