charset: minor unicode range fixes
authorMischa POSLAWSKY <perl@shiar.org>
Mon, 11 May 2009 19:10:14 +0000 (19:10 +0000)
committerMischa POSLAWSKY <perl@shiar.org>
Fri, 15 May 2009 18:56:35 +0000 (18:56 +0000)
Some miscalculations leading to cells having too much width allocated.
Also define all columns so the number is explicit (making the table
validate(able)).

charset-unicode.inc.pl
charset.plp

index 99172bb61f4ba2afa3adfaedbc834740d8cac4ad..3496c6472bdd4832924cf93125cdde3d8691fbb3 100644 (file)
@@ -23,7 +23,7 @@ my %uniblock = (
        0x07C, '<td colspan="4" class="X L African">n\'ko',
        0x080, '<td colspan="4" class="X Xr L Hebrew">samaritan',
        0x084, '<td colspan="2" class="X Xr L Aramaic">manda',
        0x07C, '<td colspan="4" class="X L African">n\'ko',
        0x080, '<td colspan="4" class="X Xr L Hebrew">samaritan',
        0x084, '<td colspan="2" class="X Xr L Aramaic">manda',
-       0x086, '<td colspan="12" class="">reserved',
+       0x086, '<td colspan="10" class="">reserved',
        0x090, '<td colspan="8" class="X L Brahmic">devanagari',
        0x098, '<td colspan="8" class="X L Brahmic">bengali',
        0x0A0, '<td colspan="8" class="X L Brahmic">gurmukhi',
        0x090, '<td colspan="8" class="X L Brahmic">devanagari',
        0x098, '<td colspan="8" class="X L Brahmic">bengali',
        0x0A0, '<td colspan="8" class="X L Brahmic">gurmukhi',
@@ -56,9 +56,9 @@ my %uniblock = (
        0x180, '<td colspan="11" class="X L Aramaic">mongolian',
        0x18B, '<td colspan="5" class="X Xr L Syllabic">canadian+',
        0x190, '<td colspan="5" class="X L Brahmic">limbu',
        0x180, '<td colspan="11" class="X L Aramaic">mongolian',
        0x18B, '<td colspan="5" class="X Xr L Syllabic">canadian+',
        0x190, '<td colspan="5" class="X L Brahmic">limbu',
-       0x195, '<td colspan="4" class="X L Brahmic">tai le',
+       0x195, '<td colspan="3" class="X L Brahmic">tai le',
        0x198, '<td colspan="6" class="X L Brahmic">new tai lue',
        0x198, '<td colspan="6" class="X L Brahmic">new tai lue',
-       0x19E, '<td colspan="2" class="X L Brahmic Khmer" title="khmer symbols">km',
+       0x19E, '<td colspan="2" class="X L Brahmic Khmer" title="khmer symbols">khmer',
        0x1A0, '<td colspan="2" class="X L Brahmic">lontara',
        0x1A2, '<td colspan="9" class="X Xr L Brahmic">tai tham',
        0x1AB, '<td colspan="5" class="">reserved',
        0x1A0, '<td colspan="2" class="X L Brahmic">lontara',
        0x1A2, '<td colspan="9" class="X Xr L Brahmic">tai tham',
        0x1AB, '<td colspan="5" class="">reserved',
index a3e845da8f9c6afa6fec4e8dde7ba572d2de0fed..bc2a1ead74090a76ab406f5693015e0cef8ab86a 100644 (file)
@@ -115,7 +115,7 @@ my @nibble = (0..9, 'A'..'F');
 for my $row (@request) {
        printf '<li><table class="glyphs%s">', !$row->{cell} && ' charmap';
        printf '<caption>%s</caption>', $row->{set};
 for my $row (@request) {
        printf '<li><table class="glyphs%s">', !$row->{cell} && ' charmap';
        printf '<caption>%s</caption>', $row->{set};
-       print '<col>';
+       print '<col>' x 17;
        for my $section (qw{thead}) {
                print "<$section><tr><th>↱";
                print '<th>', $_ for @nibble;
        for my $section (qw{thead}) {
                print "<$section><tr><th>↱";
                print '<th>', $_ for @nibble;