summaryrefslogtreecommitdiff
path: root/lisp/language/china-util.el
diff options
context:
space:
mode:
authorKenichi Handa <handa@m17n.org>2004-10-12 02:51:14 +0000
committerKenichi Handa <handa@m17n.org>2004-10-12 02:51:14 +0000
commit6bad844c143b0a0ff3334be221c3e7e385a7bd16 (patch)
tree06a49d00996bbf8035530266c36648a6579a96d7 /lisp/language/china-util.el
parentae6f73fa1ad8a3dbea69c36d6884e5c3796e8413 (diff)
downloademacs-6bad844c143b0a0ff3334be221c3e7e385a7bd16.tar.gz
(hz-set-msb-table): Turn chars beyond 128
to eight-bit chars.
Diffstat (limited to 'lisp/language/china-util.el')
-rw-r--r--lisp/language/china-util.el2
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/language/china-util.el b/lisp/language/china-util.el
index 03b41af7032..d97ec4108bf 100644
--- a/lisp/language/china-util.el
+++ b/lisp/language/china-util.el
@@ -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)))))