From: MORIOKA Tomohiko <tomo.git@chise.org>
Date: Wed, 22 Jun 2022 01:39:28 +0000 (+0900)
Subject: Use `=>shuowen-jiguge' instead of `=shuowen-jiguge' as the CCS-feature
X-Git-Url: http://git.chise.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=327af692d5472e4f942b31367d0d6b0087da3d8f;p=chise%2Fxemacs-chise.git

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.
---

diff --git a/lisp/utf-2000/ShuoWen-SR266.el b/lisp/utf-2000/ShuoWen-SR266.el
index e319e50..e0fdcb6 100644
--- a/lisp/utf-2000/ShuoWen-SR266.el
+++ b/lisp/utf-2000/ShuoWen-SR266.el
@@ -25,11 +25,20 @@
     ))
 (define-char
   '((shuowen-radical	. 266)	; 韭
-    (=shuowen-jiguge	. 24502)	; &SW-JIGUGE-24502;
+    (=>shuowen-jiguge	. 24502)	; &A-SW-JIGUGE-24502;
+    (<-Small-Seal
+     ((=ucs		  . #x4AA2)	; 䪢
+      )
+     ((=ucs		  . #x4AA3)	; 䪣
+      )
+     ((=ucs		  . #x4AA0)	; 䪠
+      )
+     ((=ucs		  . #x4AA1)	; 䪡
+      ))
     ))
 (define-char
   '((<-denotational
-     ((=shuowen-jiguge	  . 24502)	; &SW-JIGUGE-24502;
+     ((=>shuowen-jiguge	  . 24502)	; &A-SW-JIGUGE-24502;
       ))
     (shuowen-radical	. 266)	; 韭
     (===shuowen-jiguge5 . 24502)	; &SW-JIGUGE5-24502;
@@ -45,7 +54,7 @@
     ))
 (define-char
   '((<-denotational
-     ((=shuowen-jiguge	  . 24502)	; &SW-JIGUGE-24502;
+     ((=>shuowen-jiguge	  . 24502)	; &A-SW-JIGUGE-24502;
       ))
     (shuowen-radical	. 266)	; 韭
     (===shuowen-jiguge4 . 24002)	; &SW-JIGUGE4-24002;