charset: unicode zone allocations for plane 1

diff --git a/charset-ucplanes.inc.pl b/charset-ucplanes.inc.pl
index cf7c975fe48c16dd136be91fcda65fc6c90f8f46..fd01acbbd7301b6cd87006f00fb40fd6b114b675 100644 (file)
--- a/charset-ucplanes.inc.pl
+++ b/charset-ucplanes.inc.pl
@@ -61,6 +61,35 @@ my %uniblock = (
        0x0F90, '<td colspan="4" class="X L Han">cjk compat',
        0x0FB0, '<td colspan="8" class="X L Arabic">presentation',
        0x0FF0, '<td colspan="2" class="X L Latin">width',
        0x0F90, '<td colspan="4" class="X L Han">cjk compat',
        0x0FB0, '<td colspan="8" class="X L Arabic">presentation',
        0x0FF0, '<td colspan="2" class="X L Latin">width',

+
+       0x1000, '<td colspan="2" class="X L Syllabic">linear B',
+       0x1010, '<td colspan="2" class="X No">a num',
+       0x1020, '<td colspan="8" class="X L Alpha">ltr',
+       0x1060, '<td colspan="3" class="X L Syllabic">linear A',
+       0x1078, '<td colspan="1" class="X L Alpha">ltr',
+       0x1080, '<td colspan="16" class="X L Aramaic">rtl',
+       0x1100, '<td colspan="16" rowspan="2" class="X L Brahmic">brahmic',
+       0x1200, '<td colspan="16" rowspan="2" class="X L Syllabic">cuneiform',
+       0x1300, '<td colspan="16" rowspan="2" class="X L Syllabic">egyptian hieroglyphs',
+       0x1400, '<td colspan="16" rowspan="4" class="X L Syllabic">other large scripts',
+       0x1600, '<td colspan="16" rowspan="2" class="X L Alpha">recent',
+       0x1700, '<td colspan="16" rowspan="8" class="X L Han">east asian',
+       0x1B40, '<td colspan="2" class="">res',
+       0x1B50, '<td colspan="14" class="X L Syllabic">proto-elamite',
+       0x1BC0, '<td colspan="8" class="X L Alpha">shorthands',
+       0x1BE0, '<td colspan="8" class="" style="border-bottom:none">',
+       0x1C00, '<td colspan="16" rowspan="2" class="" style="border-top:none">other large scripts',
+       0x1D00, '<td colspan="8" class="X So">notational systems',
+       0x1D40, '<td colspan="8" class="X L Latin">mathematical', # Sm
+       0x1D80, '<td colspan="8" class="X L Alpha">sutton signs',
+       0x1DC0, '<td colspan="8" class="">notational',
+       0x1E00, '<td colspan="16" class="X L Alpha">ltr',
+       0x1E80, '<td colspan="16" class="X L Alpha">rtl',
+       0x1F00, '<td colspan="2" class="X So">game',
+       0x1F10, '<td colspan="4" class="X L So">enclosed',
+       0x1F30, '<td colspan="12" class="X So">pictographic',
+       0x1F80, '<td colspan="2" class="X So">arrows',
+       0x1F90, '<td colspan="14" class="">unassigned',

 );
 
 sub {
 );
 
 sub {

diff --git a/charset.plp b/charset.plp
index 6577f4c4521f7b3b7a7cb337e5975f60dbb5c234..3dd7b449bba4302596fc07e89a6aa5a1198f28aa 100644 (file)
--- a/charset.plp
+++ b/charset.plp
@@ -60,7 +60,7 @@ my @request = map {
                        $row{set} = sprintf 'Unicode block U+%02Xxx', $start >> 8;
                }
                elsif ($input eq 'U') {
                        $row{set} = sprintf 'Unicode block U+%02Xxx', $start >> 8;
                }
                elsif ($input eq 'U') {

-                       $row{table} = ' ' x 512;
+                       $row{table} = ' ' x 1024;

                        $row{set} = 'Unicode planes';
                        $row{cell} = do 'charset-ucplanes.inc.pl';
                        @nibble = (map { $_.0, $_.8 } 0 .. 7);
                        $row{set} = 'Unicode planes';
                        $row{cell} = do 'charset-ucplanes.inc.pl';
                        @nibble = (map { $_.0, $_.8 } 0 .. 7);