X-Git-Url: http://git.shiar.nl/sheet.git/blobdiff_plain/a605211aaba5d956789c1d30c09a55494858d086..0cb275788053529f8d9948920023198eecddec13:/writing.plp diff --git a/writing.plp b/writing.plp index 8ea9a0c..a718c88 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,7 +12,7 @@ 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'], }); @@ -45,8 +45,8 @@ for ( my ($source, $title) = @$_; my @table = do "writing-$source.inc.pl"; if ($! or $@) { - print "

$title

\n"; - printf "

Table data not found: %s.

\n", $! || $@; + say "

$title

"; + printf "

Table data not found: %s.

\n", $@ || $!; next; } $glyphs->print($title => [map {