From da3377840b8df4892f8b3c812acddf863d5ba07c Mon Sep 17 00:00:00 2001 From: MORIOKA Tomohiko Date: Tue, 20 Oct 2020 22:38:28 +0900 Subject: [PATCH] (ids-parse-terminal): Treat U+2FF6-itaiji-001. --- ids.el | 6 ++++-- 1 file changed, 4 insertions(+), 2 deletions(-) diff --git a/ids.el b/ids.el index a69ce6b..0a05650 100644 --- a/ids.el +++ b/ids.el @@ -46,7 +46,8 @@ (ucs (encode-char chr '=ucs 'defined-only)) big5) (unless (or (and ucs (<= #x2FF0 ucs)(<= ucs #x2FFF)) - (eq (encode-char chr '=ucs-itaiji-001) #x2FF9)) + (memq (encode-char chr '=ucs-itaiji-001) + '(#x2FF9 #x2FF6))) (if (and ucs (<= #xE000 ucs)(<= ucs #xF8FF) (setq big5 (encode-char chr 'chinese-big5))) (setq chr (decode-char '=big5-cdp big5))) @@ -61,7 +62,8 @@ (or (eq ucs #x2FF0) (eq ucs #x2FF1) (and (<= #x2FF4 ucs)(<= ucs #x2FFB)))) - (eq (encode-char chr '=ucs-itaiji-001) #x2FF9)) + (memq (encode-char chr '=ucs-itaiji-001) + '(#x2FF9 #x2FF6))) (cons chr (substring string 1)))))) -- 1.7.10.4