X-Git-Url: http://git.shiar.nl/sheet.git/blobdiff_plain/c11640facf0c976140547ef1b58971ec8a661dd3..e81df0ef9f0d7b5d22b0829f0a89a380a8e310ab:/digraphs.plp
diff --git a/digraphs.plp b/digraphs.plp
index 5c3bf07..702e3e6 100644
--- a/digraphs.plp
+++ b/digraphs.plp
@@ -1,20 +1,22 @@
<(common.inc.plp)><:
- our $VERSION = 'v1.0';
-:>
-
+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'],
+ data => [qw( digraphs.inc.pl )],
+});
-
-
-digraph cheat sheet
-<:= stylesheet(qw'light') :>
-
-
-
+:>
RFC-1345 Digraphs
-i^k in Vim.
+
i^k in Vim.
Also see common digraphs.
Unofficial proposals
@@ -61,7 +63,7 @@ for my $c1group (@chars) {
my @class = ('X', grep {$_} $prop, $script);
$glyph = EscapeHTML($glyph);
- $glyph = "$glyph" if $prop eq 'Zs';
+ $glyph = "$glyph" if $prop =~ /\bZs\b/;
printf "\n".'
%s',
join(' ', @class), EscapeHTML($desc), $glyph;
@@ -101,14 +103,3 @@ print "\n";
-
-
-
|