Eval-Error im Dispatcher auch auf STDERR ausgeben

Wurde bereits ein Template ausgegeben, bevor der Fehler auftrat, so
konnte es sein, dass die Fehlermeldung komplett verschluckt bzw. vom
Browser nicht angezeigt wird.

diff --git a/SL/Dispatcher.pm b/SL/Dispatcher.pm
index 9c9e605..cb63532 100644 (file)
--- a/SL/Dispatcher.pm
+++ b/SL/Dispatcher.pm
@@ -227,6 +227,7 @@ sub handle_request {
     1;
   } or do {
     if ($EVAL_ERROR ne END_OF_REQUEST) {
+      print STDERR $EVAL_ERROR;
       $::form->{label_error} = $::cgi->pre($EVAL_ERROR);
       eval { show_error('generic/error') };
     }