# HG changeset patch # User Kenichi Handa # Date 1097549474 0 # Node ID 845142d93266a5c3815438b7a05f8c4e0cea5793 # Parent 26cef35a15620334e24725d1f592e9293129cbf3 (hz-set-msb-table): Turn chars beyond 128 to eight-bit chars. diff -r 26cef35a1562 -r 845142d93266 lisp/language/china-util.el --- 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)))))