common: fix double html headers on plp errors

[sheet.git] / common.inc.plp

diff --git a/common.inc.plp b/common.inc.plp
index d0e1c328ec862f2221443b2517804927f7592a84..b8dac37ed30c9f043b50b9c6e5fa6fabaed83d82 100644 (file)
--- a/common.inc.plp
+++ b/common.inc.plp
@@ -198,7 +198,7 @@ BEGIN {
        $PLP::ERROR = sub {
                my ($text, $html) = @_;
                warn $text;
-               unless ($PLP::sentheaders and $PLP::sentheaders->[0] !~ m{/PLP\.pm$}) {
+               unless ($PLP::sentheaders) {
                        Html({nocache => 1});
                        say '<h1>Page unavailable</h1>';
                }