From 0c087558bcb6cecdc75f8684b3e7643d9ff9b377 Mon Sep 17 00:00:00 2001 From: MORIOKA Tomohiko Date: Mon, 19 Jul 2021 20:50:46 +0900 Subject: [PATCH] (A-U+2008B-itaiji-002): New character; use `<-subsumptive' for U-0002008B; unify A-U+2008B-itaiji-003. (U+2008B-itaiji-002): Use A-U+2008B-itaiji-002 instead of U-0002008B as its mother. (U+2008B-itaiji-003): New character; use `<-subsumptive' for A-U+2008B-itaiji-002. --- lisp/utf-2000/Ideograph-R004-Slash.el | 13 +++++++++++-- 1 file changed, 11 insertions(+), 2 deletions(-) diff --git a/lisp/utf-2000/Ideograph-R004-Slash.el b/lisp/utf-2000/Ideograph-R004-Slash.el index d90738e..ae6d841 100644 --- a/lisp/utf-2000/Ideograph-R004-Slash.el +++ b/lisp/utf-2000/Ideograph-R004-Slash.el @@ -1873,9 +1873,18 @@ ) ((=ucs . #x4E00) ; 一 )) - (=ucs-itaiji-002 . #x2008B) ; &U-i002+2008B; + (=>ucs-itaiji-002 . #x2008B) ; &A-U-i002+2008B; + (=>ucs-itaiji-003 . #x2008B) ; &A-U-i002+2008B; (->subsumptive - ((==ucs-itaiji-002 . #x2008B) ; &g2-U-i002+2008B; + ((=ucs-itaiji-002 . #x2008B) ; &U-i002+2008B; + (->subsumptive + ((==ucs-itaiji-002 . #x2008B) ; &g2-U-i002+2008B; + )) + ) + ((=ucs-itaiji-003 . #x2008B) ; &U-i003+2008B; + (->subsumptive + ((==ucs-itaiji-003 . #x2008B) ; &g2-U-i003+2008B; + )) )) )) )) -- 1.7.10.4