X-Git-Url: http://git.shiar.nl/sheet.git/blobdiff_plain/1d37e00ff50c4cee3f23749febcfe6e33e1f608a..639fdc8bc76794c1ed49ce7ea11cc18c381f8de6:/digraphs.plp
diff --git a/digraphs.plp b/digraphs.plp
index fbe8a5d..5192c25 100644
--- a/digraphs.plp
+++ b/digraphs.plp
@@ -1,28 +1,14 @@
-<:
-use utf8;
-use strict;
-use warnings;
-no warnings 'qw'; # to quote or not to quote, that is the question
-use open IO => ':utf8';
-
-our $VERSION = 'v1.0';
-
-$header{content_type} = 'text/html; charset=utf-8';
+<(common.inc.plp)><:
+ our $VERSION = 'v1.0';
:>
+
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;
-:>
+<:= stylesheet(qw'light') :>
@@ -124,11 +110,13 @@ print "\n";