X-Git-Url: http://git.shiar.nl/sheet.git/blobdiff_plain/dae21a09b01baa118720670247a87c5cdc2591b8..862a7763364af7fb80ee3515a88a7f157438dbe0:/digraphs.plp?ds=inline diff --git a/digraphs.plp b/digraphs.plp index d44a7fa..8b09697 100644 --- a/digraphs.plp +++ b/digraphs.plp @@ -1,31 +1,18 @@ -<: -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)><: + +Html({ + title => 'digraph cheat sheet', + version => 'v1.0', + description => [ + "Complete table of digraph characters from RFC-1345.", + ], + keywords => [qw' + digraph compose character char glyph table unicode vim + '], + stylesheet => [qw'light'], +}); -
- -i^k in Vim. @@ -37,14 +24,6 @@ are available as ex commands.
<: my $di = do 'digraphs.inc.pl'; -sub quote { - local $_ = shift; - s/"/"/g; - s/</g; - s/>/>/g; - return $_; -} - my @chars = ( [qw{! " % ' ( ) * + , - . /}], ['0'..'9'], [qw{: ; < = > ?}], @@ -58,13 +37,13 @@ print qq'