X-Git-Url: http://git.shiar.nl/sheet.git/blobdiff_plain/b8cac6e3a9b47f1a2ae9dfc7bfc53df8fec1d004..0521f436ed93fcfee1073656b425522cef34b204:/digraphs.plp?ds=sidebyside diff --git a/digraphs.plp b/digraphs.plp index b62b577..075a398 100644 --- a/digraphs.plp +++ b/digraphs.plp @@ -57,6 +57,10 @@ for my $c1group (@chars) { print ''; next; } + if (ref $di->{$mnem} ne 'ARRAY') { + printf '', quote($mnem); + next; + } my ($codepoint, $name, $prop, $script) = @{ $di->{$mnem} }; my $glyph = chr $codepoint;