From a825aa0b135b206682bd7f84baa0fd7a7b8f3845 Mon Sep 17 00:00:00 2001 From: Eli Zaretskii Date: Sat, 24 Dec 2022 12:08:43 +0200 Subject: [PATCH] Fix definition of CNS 11643-15 charset * lisp/international/mule-conf.el (chinese-cns11643-15): Fix :code-offset value. (Bug#60275) * lisp/international/characters.el: Add chinese-cns11643-15 to charsets whose characters have categories c and C. --- lisp/international/characters.el | 2 +- lisp/international/mule-conf.el | 2 +- 2 files changed, 2 insertions(+), 2 deletions(-) diff --git a/lisp/international/characters.el b/lisp/international/characters.el index 9dcae187f21..42344d499cf 100644 --- a/lisp/international/characters.el +++ b/lisp/international/characters.el @@ -184,7 +184,7 @@ with L, LRE, or LRO Unicode bidi character type.") (dolist (c '(chinese-cns11643-1 chinese-cns11643-2 chinese-cns11643-3 chinese-cns11643-4 chinese-cns11643-5 chinese-cns11643-6 - chinese-cns11643-7)) + chinese-cns11643-7 chinese-cns11643-15)) (map-charset-chars #'modify-category-entry c ?c) (if (eq c 'chinese-cns11643-1) (map-charset-chars #'modify-category-entry c ?C #x4421 #x7E7E) diff --git a/lisp/international/mule-conf.el b/lisp/international/mule-conf.el index 3f3ac6064ae..65ba2370fcf 100644 --- a/lisp/international/mule-conf.el +++ b/lisp/international/mule-conf.el @@ -1268,7 +1268,7 @@ :short-name "CNS11643-15" :long-name "CNS11643-15 (Chinese traditional)" :code-space [33 126 33 126] - :code-offset #x27A000 + :code-offset #x28083A ; Right after 'big5-hkscs. :unify-map "CNS-F") (unify-charset 'chinese-gb2312) -- 2.39.5