X-Git-Url: http://git.shiar.nl/sheet.git/blobdiff_plain/c544fb231402a1111fbc42dd7bae87aed6b0f4dc..b93feea4a4cd9bb503465ead1b73f89b8f36d429:/latin.plp?ds=inline diff --git a/latin.plp b/latin.plp index bbd256b..687e082 100644 --- a/latin.plp +++ b/latin.plp @@ -17,35 +17,6 @@ Html({ :> @@ -127,6 +59,15 @@ if ($! or $@) { Alert("Table data not found", $@ || $!); } else { + say '\n"; + my %VOWELCOLS = (map { ($_ => 1) } 0, 4, 8, 14, 20, 24); say '
# ASCII â 64'; @@ -134,12 +75,14 @@ else { 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++; |