diff options
| -rw-r--r-- | perl-install/install_steps_auto_install.pm | 7 |
1 files changed, 6 insertions, 1 deletions
diff --git a/perl-install/install_steps_auto_install.pm b/perl-install/install_steps_auto_install.pm index 0c09fc6ed..d30e9bc4a 100644 --- a/perl-install/install_steps_auto_install.pm +++ b/perl-install/install_steps_auto_install.pm @@ -105,7 +105,12 @@ sub errorInStep { print "$err\n\n"; print "switch to console f2 for a shell\n"; print "Press <Enter> to reboot\n"; - <STDIN>; + + my $answer = <STDIN>; + if ($answer =~ /restart/i) { + log::l("restarting install"); + c::_exit(0x35); + } c::_exit(0); } |