X-Git-Url: http://git.shiar.nl/sheet.git/blobdiff_plain/423d297ed8c97ba5dff7c79e48d9ee3bab609cd1..153fca5bc148960bb538bfc43b79b944608d2b2f:/common.inc.plp diff --git a/common.inc.plp b/common.inc.plp index 1e3f30a..4bf28bf 100644 --- a/common.inc.plp +++ b/common.inc.plp @@ -8,7 +8,7 @@ use open ':std' => ':utf8'; use File::stat 'stat'; use HTTP::Date; -use Shiar_Sheet::KeySigns qw(%sign); # dependant on $get{ascii} +use Shiar_Sheet::KeySigns qw(%sign); our $style; our $showkeys = !exists $get{keys} ? undef : @@ -87,7 +87,6 @@ sub Html { ref $_ eq 'ARRAY' and $_ = stylesheet(@$_)."\n" for $meta->{stylesheet}; # other vars - my $sep = $meta->{charset} eq 'utf-8' ? '•' : ' -- '; my ($file) = $ENV{SCRIPT_FILENAME} =~ m{ ([^/]+) \.plp$ }x; # leading output @@ -116,7 +115,7 @@ EOT rel="code" title="Written in Perl">plp $meta->{version} - created by $sep + created by $sign{sep} AGPLv3