charset: unicode zone allocations for plane 1

[sheet.git] / charset.plp

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{table} = ' ' x 512;
+                       $row{table} = ' ' x 1024;
                        $row{set} = 'Unicode planes';
                        $row{cell} = do 'charset-ucplanes.inc.pl';
                        @nibble = (map { $_.0, $_.8 } 0 .. 7);