diff options
Diffstat (limited to 'perl-install/standalone.pm')
| -rw-r--r-- | perl-install/standalone.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/standalone.pm b/perl-install/standalone.pm index 07c251daa..994ff7edc 100644 --- a/perl-install/standalone.pm +++ b/perl-install/standalone.pm @@ -193,7 +193,7 @@ sub bug_handler { my ($error, $is_signal) = @_; # exceptions in eval are OK: - return if $error && $^S && !$is_signal; + return if $error && $^S ne '0' && !$is_signal; # exceptions with "\n" are normal ways to quit: if (!$is_signal && $error eq MDK::Common::String::formatError($error)) { |