X-Git-Url: http://git.shiar.net/sheet.git/blobdiff_plain/5464db21077f6af072bd770f6cb6e907eb48b73d..4cd7a16bb62318837752001e0d9a38b38bef3926:/writing.plp diff --git a/writing.plp b/writing.plp index d71dba4..2f08da6 100644 --- a/writing.plp +++ b/writing.plp @@ -2,7 +2,7 @@ Html({ title => 'writing system inheritance sheet', - version => 'v1.0', + version => '1.2', description => [ "Character comparison,", "tracking letters as they evolve from Phoenician to modern scripts.", @@ -12,13 +12,16 @@ Html({ script glyph unicode writing comparison character alphabet letter history phoenician latin sample test language multilingual '], - stylesheet => [qw'light dark red'], + stylesheet => [qw'light circus dark red mono'], + data => [qw'writing-phnx.inc.pl'], }); :>
Also see charsets +
+Comparison of Unicode letters in related alphabets. +Also see charsets and common chars.
Table data not found: %s.
\n", $! || $@; + say "Table data not found: %s.
\n", $@ || $!; next; } - $glyphs->print($title => [ map { @$_ } grep { ref $_ eq 'ARRAY' } @table ]); + $glyphs->print($title => [map { + my $lead = s/^(-)// && $1; + ref $_ eq 'ARRAY' ? @$_ : map { ".>$lead$_" } + $scriptname->{$source.'_'.$_} || $scriptname->{$_} || $_ + } @table]); } -:>