common: copy plp errors on stderr
authorMischa POSLAWSKY <perl@shiar.org>
Wed, 29 Mar 2017 11:11:52 +0000 (13:11 +0200)
committerMischa POSLAWSKY <perl@shiar.org>
Mon, 10 Apr 2017 13:28:46 +0000 (15:28 +0200)
Log unexpected runtime failure.

common.inc.plp

index 18c2471..593adb0 100644 (file)
@@ -12,6 +12,7 @@ use HTTP::Date;
 $PLP::ERROR = sub {
        my ($text, $html) = @_;
        print '<p class="error"><strong>Fatal error</strong>: '.$html."</p>\n\n";
+       warn $text;
 };
 
 BEGIN {