diff options
Diffstat (limited to 'perl-install/install2.pm')
| -rw-r--r-- | perl-install/install2.pm | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/perl-install/install2.pm b/perl-install/install2.pm index 8bd94c67b..3f9414a78 100644 --- a/perl-install/install2.pm +++ b/perl-install/install2.pm @@ -491,12 +491,12 @@ sub exitInstall { $o->exitInstall(getNextStep() eq "exitInstall") } #-###################################################################################### sub main { $SIG{__DIE__} = sub { chomp(my $err = $_[0]); log::l("warning: $err") }; -# $SIG{SEGV} = sub { my $msg = "segmentation fault: seems like memory is missing as the install crashes"; print "$msg\n"; log::l($msg); -# $o->ask_warn('', $msg); -# setVirtual(1); -# require install_steps_auto_install; -# install_steps_auto_install::errorInStep(); -# }; + $SIG{SEGV} = sub { my $msg = "segmentation fault: seems like memory is missing as the install crashes"; print "$msg\n"; log::l($msg); + $o->ask_warn('', $msg); + setVirtual(1); + require install_steps_auto_install; + install_steps_auto_install::errorInStep(); + }; $ENV{SHARE_PATH} ||= "/usr/share"; $ENV{DURING_INSTALL} = 1; |