diff options
Diffstat (limited to 'perl-install')
| -rw-r--r-- | perl-install/install_any.pm | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/perl-install/install_any.pm b/perl-install/install_any.pm index e74de756d..e1d9a8e66 100644 --- a/perl-install/install_any.pm +++ b/perl-install/install_any.pm @@ -285,8 +285,12 @@ sub getNextStep { find { !$o->{steps}{$_}{done} && $o->{steps}{$_}{reachable} } @{$o->{orderedSteps}}; } +sub dont_run_directly_stage2() { + readlink("/usr/bin/runinstall2") eq "runinstall2.sh"; +} + sub spawnShell() { - return if $::o->{localInstall} || $::testing; + return if $::o->{localInstall} || $::testing || dont_run_directly_stage2(); if (my $shellpid = fork()) { output('/var/run/drakx_shell.pid', $shellpid); |