From 237e41e889b3c167bdddb5886bf98d70fa954450 Mon Sep 17 00:00:00 2001 From: MORIOKA Tomohiko Date: Mon, 20 Jun 2022 20:05:27 +0900 Subject: [PATCH] Use `=>shuowen-jiguge' instead of `=shuowen-jiguge' as the CCS-feature of abstract character of Shuowen-Jiguge which has `->denotational' to combine some Small-Seal glyphs. (SW-JIGUGE-42226): Add U-00022C95 as a corresponding modern character. --- lisp/utf-2000/ShuoWen-SR441.el | 11 ++++++++--- 1 file changed, 8 insertions(+), 3 deletions(-) diff --git a/lisp/utf-2000/ShuoWen-SR441.el b/lisp/utf-2000/ShuoWen-SR441.el index ffd5be2..aaef45d 100644 --- a/lisp/utf-2000/ShuoWen-SR441.el +++ b/lisp/utf-2000/ShuoWen-SR441.el @@ -220,11 +220,14 @@ )) (define-char '((shuowen-radical . 441) ; 手 - (=shuowen-jiguge . 41813) ; &SW-JIGUGE-41813; + (=>shuowen-jiguge . 41813) ; &A-SW-JIGUGE-41813; + (<-Small-Seal + ((=ucs . #x62DC) ; 拜 + )) )) (define-char '((<-denotational - ((=shuowen-jiguge . 41813) ; &SW-JIGUGE-41813; + ((=>shuowen-jiguge . 41813) ; &A-SW-JIGUGE-41813; )) (shuowen-radical . 441) ; 手 (===shuowen-jiguge5 . 41813) ; &SW-JIGUGE5-41813; @@ -243,7 +246,7 @@ )) (define-char '((<-denotational - ((=shuowen-jiguge . 41813) ; &SW-JIGUGE-41813; + ((=>shuowen-jiguge . 41813) ; &A-SW-JIGUGE-41813; )) (shuowen-radical . 441) ; 手 (===shuowen-jiguge4 . 40513) ; &SW-JIGUGE4-40513; @@ -1971,6 +1974,8 @@ '((shuowen-radical . 441) ; 手 (=shuowen-jiguge . 42226) ; &SW-JIGUGE-42226; (<-Small-Seal@shuowen + ((=ucs . #x22C95) ; 𢲕 + ) ((=ucs . #x63C6) ; 揆 )) (->subsumptive -- 1.7.10.4