fix wide characters; tested iso10646

[xfonts-traditional] / update-xfonts-traditional

diff --git a/update-xfonts-traditional b/update-xfonts-traditional
index 5e291333a2c17e30ec30b24ac8839a98399cfaf5..65d1d086c333112bdeb5f0727f2e7a687fd49197 100755 (executable)
--- a/update-xfonts-traditional
+++ b/update-xfonts-traditional
@@ -112,6 +112,9 @@ sub processbdf ($$$$) {
                $y=0;
                $glyph='';
                $state='bitmap';
+               $props{' 7bit'}=
+                   ($props{'CHARSET_REGISTRY'} =~ m/iso8859|utf|iso10646/i &&
+                    $props{'ENCODING'} <= 127);
            }
        }
        print $outbdf $_ or die $!;