X-Git-Url: http://git.shiar.nl/sheet.git/blobdiff_plain/777198d5e254e56477f141b5ee693b5b6be524e6..aba1357633e2f377e38961d379cf072aa7462afd:/digraphs.plp
diff --git a/digraphs.plp b/digraphs.plp
index 81944b2..84b063e 100644
--- a/digraphs.plp
+++ b/digraphs.plp
@@ -2,6 +2,7 @@
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 = '1.0';
@@ -16,6 +17,7 @@ $header{content_type} = 'text/html; charset=utf-8';
digraph cheat sheet
+
@@ -24,6 +26,9 @@ $header{content_type} = 'text/html; charset=utf-8';
i^k in Vim.
Also see common digraphs.
+Unofficial proposals
+are available as ex commands.
+
<:
my $di = do 'digraphs.inc.pl';
@@ -43,11 +48,11 @@ my @chars = (
);
my @chars2 = (['_'], @chars); # trailing character (extended set)
-print '';
+print '';
print qq'' for map {scalar @$_} @chars2;
print "\n";
for my $section (qw{thead tfoot}) {
- print "<$section>| ";
+ print "<$section> |
|---|
| â³";
print ' | ', quote($_) for map {@$_} @chars2;
print " | \n";
}
@@ -84,7 +89,7 @@ for my $c1group (@chars) {
print " |
|---|
\n";
:>
-
+
| control
| spacing
| modifier
@@ -105,7 +110,7 @@ print " |
\n";
chinese
|
-
+
| unicode
| latin1
| ascii
@@ -114,8 +119,8 @@ print " |
\n";