X-Git-Url: http://git.shiar.nl/sheet.git/blobdiff_plain/b5770997564659fc6a205c774152f6f41d8d1832..a0ba9298856b2426c5c66b6d2f2b284d98cee594:/digraphs.plp diff --git a/digraphs.plp b/digraphs.plp index 98fba89..73189c9 100644 --- a/digraphs.plp +++ b/digraphs.plp @@ -16,7 +16,13 @@ $header{content_type} = 'text/html; charset=utf-8'; digraph cheat sheet - +<: + my %styles = map {$_ => $_} qw(dark circus mono red terse); + our $style = exists $get{style} && $styles{$get{style}} || 'light'; + printf(qq{\n}, + $_ eq $style ? 'stylesheet' : 'alternate stylesheet', "$_.css", $_ + ) for keys %styles; +:>