X-Git-Url: http://git.shiar.nl/sheet.git/blobdiff_plain/9fbe7cd69afa935c523e47d026d90158b1406bc4..388747c44481439d1fa4614a804cbaa75441db35:/common.inc.plp?ds=sidebyside
diff --git a/common.inc.plp b/common.inc.plp
index e5292ba..68ada33 100644
--- a/common.inc.plp
+++ b/common.inc.plp
@@ -34,6 +34,8 @@ BEGIN {
Alert("Fatal error: $html.");
};
+ push @INC, '.';
+
# user request
our $Dev = $ENV{HTTP_HOST} =~ /\bdev\./;
our ($file) = $ENV{SCRIPT_FILENAME} =~ m{ ([^/]+) \.plp$ }x;
@@ -105,7 +107,7 @@ sub Html {
}
# default fallbacks
- $meta->{stylesheet} ||= [qw'light dark circus mono red terse'];
+ $meta->{stylesheet} ||= [qw( light dark circus mono red )];
$meta->{charset} ||= 'utf-8';
# convert options to arrays
@@ -117,13 +119,17 @@ sub Html {
unless $PLP::sentheaders;
unshift @{ $meta->{raw} }, stylesheet($meta->{stylesheet});
+ push @{ $meta->{raw} }, (
+ '',
+ );
+
# optional amends
push @{ $meta->{raw} }, (
'',
'',
!$showkeys ? '' :
$showkeys eq 'ghost' ? '' : (),
- '',
+ '',
) if $meta->{keys};
# leading output