X-Git-Url: http://git.shiar.nl/sheet.git/blobdiff_plain/451bf471d1e1b84e74eae3683a433f2d4a979d13..v1.14-7-ge90c9ada43:/writing.plp?ds=sidebyside diff --git a/writing.plp b/writing.plp index d6269e8..82049fe 100644 --- a/writing.plp +++ b/writing.plp @@ -2,7 +2,7 @@ Html({ title => 'writing system inheritance sheet', - version => 'v1.0', + version => '1.3', description => [ "Character comparison,", "tracking letters as they evolve from Phoenician to modern scripts.", @@ -12,14 +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", $! || $@; + my @table = eval { Data("writing-$source") } or do { + say "%s: %s.
\n", @{$@}; next; - } + }; $glyphs->print($title => [map { - ref $_ eq 'ARRAY' ? @$_ : map { ".>$_" } + my $lead = s/^(-)// && $1; + ref $_ eq 'ARRAY' ? @$_ : map { ".>$lead$_" } $scriptname->{$source.'_'.$_} || $scriptname->{$_} || $_ } @table]); } -:>