X-Git-Url: http://git.shiar.nl/sheet.git/blobdiff_plain/d22e7febda8720bc38069f7061adb43b98143c48..15d902acaa8a1fc24f756dcc5788d697a0c69a48:/common.inc.plp diff --git a/common.inc.plp b/common.inc.plp index e3316fc..9b61d52 100644 --- a/common.inc.plp +++ b/common.inc.plp @@ -132,36 +132,38 @@ sub Html { '', ) if $meta->{keys}; - # leading output - say ''; - say ''; - say ''; - say '
'; - say sprintf '', $_ - for $header{content_type}; - say sprintf 'beta
', join('; ', - 'position: fixed', - 'right: 1em', - 'opacity: .5', - 'border: 1ex solid red', - 'border-width: 1ex 0', - 'z-index: 1', - 'background: inherit', - ) if $Dev; + PLP_START { + # leading output + say ''; + say ''; + say ''; + say ''; + say sprintf '', $_ + for $header{content_type}; + say sprintf 'beta
', join('; ', + 'position: fixed', + 'right: 1em', + 'opacity: .5', + 'border: 1ex solid red', + 'border-width: 1ex 0', + 'z-index: 1', + 'background: inherit', + ) if $Dev; + }; # prepare trailing output PLP_END {