changeset 90012:845142d93266

(hz-set-msb-table): Turn chars beyond 128 to eight-bit chars.
author Kenichi Handa <handa@m17n.org>
date Tue, 12 Oct 2004 02:51:14 +0000
parents 26cef35a1562
children 497891b0afeb
files lisp/language/china-util.el
diffstat 1 files changed, 1 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/language/china-util.el	Tue Oct 12 02:40:21 2004 +0000
+++ b/lisp/language/china-util.el	Tue Oct 12 02:51:14 2004 +0000
@@ -74,7 +74,7 @@
 	(push i chars)
 	(setq i (1+ i)))
       (while (< i 127)
-	(push (+ i 128) chars)
+	(push (decode-char 'eight-bit (+ i 128)) chars)
 	(setq i (1+ i)))
       (apply 'string (nreverse chars)))))