X-Git-Url: http://git.shiar.nl/sheet.git/blobdiff_plain/dae21a09b01baa118720670247a87c5cdc2591b8..639fdc8bc76794c1ed49ce7ea11cc18c381f8de6:/source.plp diff --git a/source.plp b/source.plp index 5359dbe..d874979 100644 --- a/source.plp +++ b/source.plp @@ -1,11 +1,5 @@ -<: -use utf8; -use strict; -use warnings; - -our $VERSION = 'v1.0'; - -$header{content_type} = "text/html; charset=utf-8"; +<(common.inc.plp)><: + our $VERSION = 'v1.0'; :> @@ -14,13 +8,7 @@ $header{content_type} = "text/html; charset=utf-8"; sheet page source code -<: - my %styles = map {$_ => $_} qw(dark mono red); - our $style = exists $get{style} && $styles{$get{style}} || 'light'; - printf(qq{\n}, - $_ eq $style ? 'stylesheet' : 'alternate stylesheet', "/$_.css", $_ - ) for keys %styles; -:> +<:= stylesheet(qw'light dark mono red') :>