X-Git-Url: http://git.shiar.net/sheet.git/blobdiff_plain/cb397bfc503077962ce48f6dccb8fa8b6460ec0a..ce93e984084764f24f25324e8033c405b7e768f5:/latin.plp?ds=sidebyside diff --git a/latin.plp b/latin.plp index e0bb689..687e082 100644 --- a/latin.plp +++ b/latin.plp @@ -17,76 +17,16 @@ Html({ :> @@ -120,15 +59,30 @@ if ($! or $@) { Alert("Table data not found", $@ || $!); } else { + say '\n"; + my %VOWELCOLS = (map { ($_ => 1) } 0, 4, 8, 14, 20, 24); say '
# ASCII â 64'; + print ' | ', $_ for 1 .. 26; + say ' |
---|---|
', $title; + my ($id, $info) = @{$row}; + + printf ' | |
', $info->{title} // ucfirst $id; + my $colspan = 1; my $col = 0; - for (@{$cells}) { + for (@{ $info->{list} }) { $col++; if ($_ eq '>') { $colspan++; |