X-Git-Url: http://git.shiar.nl/sheet.git/blobdiff_plain/0ec1918e9ea19466404dd204c30dea88af25bea7..90bfe9a4d5cb83c325d989f260c1e1e1f6c74427:/cc.plp diff --git a/cc.plp b/cc.plp index 08a2341..2162668 100644 --- a/cc.plp +++ b/cc.plp @@ -15,7 +15,13 @@ $header{content_type} = 'text/html; charset=utf-8'; country code cheat sheet - +<: + 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; +:> @@ -34,7 +40,7 @@ sub quote { { printf ''; - print ''; + print ''; for my $section (qw{thead}) { print "<$section>
↱"; print '', $_ for 'a' .. 'z'; @@ -89,11 +95,11 @@ sub quote { africa europe asia - oceania antarctica + oceania south america north america - reserved + reserved user-assigned