X-Git-Url: http://git.shiar.nl/sheet.git/blobdiff_plain/53686d73c4a758bc3ca80e2f0def103f37e37fa3..a0f942a8498d6f1574c57c5943a7d21eb9634898:/latin.plp diff --git a/latin.plp b/latin.plp index ed6f65b..c9c59ad 100644 --- a/latin.plp +++ b/latin.plp @@ -119,7 +119,9 @@ else { printf '', (lc $title) =~ s/<[^>]+>//gr =~ s/\s+/-/gr; say '', $title; my $colspan = 1; + my $col = 0; for (@{$cells}) { + $col++; if ($_ eq '>') { $colspan++; next; @@ -129,6 +131,7 @@ else { print " colspan=$colspan"; $colspan = 1; } + print ' hidden' if $col > 26; # sample only print ' class=', $_ ? 'ex' : 'u-invalid' if s/^-//; print '>'; say;