X-Git-Url: http://git.shiar.net/sheet.git/blobdiff_plain/94d2617063ee5d7e3a8fdec583169bdf6e7f9093..dbf4a34af50113bb56c5dfaae3afeb6441e0cd8d:/unicode.plp?ds=inline diff --git a/unicode.plp b/unicode.plp index a7d5459..1f74144 100644 --- a/unicode.plp +++ b/unicode.plp @@ -10,7 +10,6 @@ Html({ keywords => [qw' unicode glyph char character reference common ipa symbol sign mark table digraph '], - stylesheet => [qw'light dark mono circus red'], data => [qw( unicode-table.inc.pl data/unicode-char.inc.pl )], }); @@ -153,6 +152,7 @@ $glyphs->print(map { last if $table->[$rowlen] =~ /\./; } my @cells = map { + s/^(?=-)/0/; my $end = (s/-(.+)?// ? ($1 // @$table / $rowlen - 1) : $_) + 1; $_ * $rowlen .. $end * $rowlen - 1; } @select;