unicode: secondary ipa header with place categories
authorMischa POSLAWSKY <perl@shiar.org>
Mon, 24 Apr 2017 00:22:31 +0000 (02:22 +0200)
committerMischa POSLAWSKY <perl@shiar.org>
Mon, 29 May 2017 16:51:17 +0000 (18:51 +0200)
Support multiple > prefixes in header cells to span multiple columns.

Shiar_Sheet/FormatChar.pm
unicode-table.inc.pl

index d7c59c1..71dadfe 100644 (file)
@@ -248,11 +248,15 @@ sub table {
        my @colheads;
        while ($digraphs->[0] !~ /^\./) {
                my $cell = shift @$digraphs or last;
+               if ($cell eq '>') {
+                       push @colheads, '<tr>';
+                       next;
+               }
                push @colheads, join('',
                        '<',
                        $cell =~ s/^-// ? 'td' : 'th',
                        $cell =~ s/:(.*)// && qq{ title="$1"},
-                       $cell =~ s/^>// && ' colspan=2',
+                       $cell =~ s/^(>+)// && ' colspan='.(length($1) + 1),
                        '>',
                        $cell eq '_' ? '&nbsp;' : $cell
                );
index f93a8d8..64f3e23 100644 (file)
@@ -172,6 +172,7 @@ latin => {
 
 ipa => {
        cons => [qw{
+               - >Labial >>>Coronal >>Dorsal >>Laryngeal >
                - BiL:Bilabial LD:Labiodental D:Dental Alv:Alveolar PA:Postalveolar
                  Rf:Retroflex Pal:Palatal Vel:Velar Uv:Uvular Ph:Pharyngeal
                  EG:Epiglottal Gl:Glottal