X-Git-Url: http://git.shiar.nl/sheet.git/blobdiff_plain/ff415f6392ee38af55f1657c02d5a0069779b82f..a255ce32f22b2f236fd201e9519dfb9a1d4b7454:/digraphs.plp
diff --git a/digraphs.plp b/digraphs.plp
index 068961d..6193b97 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';
@@ -46,7 +47,7 @@ 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}) {
@@ -87,7 +88,7 @@ for my $c1group (@chars) {
print "
\n";
:>
-
+
control
| spacing
| modifier
@@ -108,7 +109,7 @@ print " |
\n";
chinese
|
-