X-Git-Url: http://git.shiar.nl/sheet.git/blobdiff_plain/69adcf65e2485a578d91c747fc764f3c43834f7b..d9ec472869a2c33c469cad90a21b221f14f29af3:/common.inc.plp diff --git a/common.inc.plp b/common.inc.plp index b8dac37..f7ca700 100644 --- a/common.inc.plp +++ b/common.inc.plp @@ -47,10 +47,10 @@ BEGIN { our $Dev = $ENV{HTTP_HOST} =~ /\bdev\./; } -our $Request = decode_utf8($ENV{PATH_INFO} =~ s{^/}{}r); +our $Request //= decode_utf8($ENV{PATH_INFO} =~ s{^/}{}r); our $style; -our $showkeys = !exists $get{keys} ? undef : +our $showkeys //= !exists $get{keys} ? undef : ($get{keys} ne '0' && ($get{keys} || 'always')); $header{content_type} = 'text/html; charset=utf-8'; @@ -78,7 +78,7 @@ sub stylesheet { return map { sprintf( '', - $_ eq $style ? 'stylesheet' : 'alternate stylesheet', "/$_.css?1.11", $_ + $_ eq $style ? 'stylesheet' : 'alternate stylesheet', "/$_.css?1.12", $_ ) } @avail; }