summaryrefslogtreecommitdiff
path: root/lisp/international/subst-jis.el
diff options
context:
space:
mode:
authorKenichi Handa <handa@m17n.org>2003-10-02 00:47:40 +0000
committerKenichi Handa <handa@m17n.org>2003-10-02 00:47:40 +0000
commit693fa2c7111edc1431cbb5d1f4a255187bb7a865 (patch)
treed80e7ab21cb955733a9b880ac4fce9f599b682da /lisp/international/subst-jis.el
parent18db88965e88e9e3704520cf08ff7fc75d2e1a32 (diff)
downloademacs-693fa2c7111edc1431cbb5d1f4a255187bb7a865.tar.gz
Include U+FF00..U+FFEF in decode table.
Diffstat (limited to 'lisp/international/subst-jis.el')
-rw-r--r--lisp/international/subst-jis.el3
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/international/subst-jis.el b/lisp/international/subst-jis.el
index 7fb7f1ac883..7e1c0bd5df8 100644
--- a/lisp/international/subst-jis.el
+++ b/lisp/international/subst-jis.el
@@ -47,7 +47,8 @@
(let ((unicode (car pair))
(char (cadr pair)))
;; exclude non-CJK components from decode table
- (if (and (>= unicode #x2e80) (<= unicode #xd7a3))
+ (if (or (and (>= unicode #x2e80) (<= unicode #xd7a3))
+ (and (>= unicode #xff00) (<= unicode #xffef)))
(puthash unicode char ucs-unicode-to-mule-cjk))
(puthash char unicode ucs-mule-cjk-to-unicode)))
'(