diff options
| -rw-r--r-- | perl-install/NEWS | 3 | ||||
| -rw-r--r-- | perl-install/standalone.pm | 2 |
2 files changed, 4 insertions, 1 deletions
diff --git a/perl-install/NEWS b/perl-install/NEWS index 25e31dfa1..c0d7eb3bd 100644 --- a/perl-install/NEWS +++ b/perl-install/NEWS @@ -1,3 +1,6 @@ +- drakbug: + o handle strange DBus errors + Version 11.58 - 29 September 2008 - libDrakX: diff --git a/perl-install/standalone.pm b/perl-install/standalone.pm index d9dae154e..3eccdbe92 100644 --- a/perl-install/standalone.pm +++ b/perl-install/standalone.pm @@ -196,7 +196,7 @@ sub bug_handler { 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)) { + if (!$is_signal && eval { $error eq MDK::Common::String::formatError($error) }) { warn $error; exit(255); } |