From b83ca76abbf25738a03054c18870aae5c6e47d97 Mon Sep 17 00:00:00 2001
From: MORIOKA Tomohiko <tomo.git@chise.org>
Date: Sun, 3 Jul 2022 08:21:37 +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-JIGUGE5-46915): Add U+9F05 as a corresponding modern
 character. (SW-JIGUGE4-45915): Ditto. (SW-JIGUGE-46916):
 Add U-00027332 and U+8718 as corresponding modern
 characters.

---
 lisp/utf-2000/ShuoWen-SR477.el |   21 ++++++++++++++++++---
 1 file changed, 18 insertions(+), 3 deletions(-)

diff --git a/lisp/utf-2000/ShuoWen-SR477.el b/lisp/utf-2000/ShuoWen-SR477.el
index 9ca3469..7905a82 100644
--- a/lisp/utf-2000/ShuoWen-SR477.el
+++ b/lisp/utf-2000/ShuoWen-SR477.el
@@ -145,26 +145,35 @@
     ))
 (define-char
   '((shuowen-radical	. 477)	; 黽
-    (=shuowen-jiguge	. 46915)	; &SW-JIGUGE-46915;
+    (=>shuowen-jiguge	. 46915)	; &A-SW-JIGUGE-46915;
+    (<-Small-Seal
+     ((=ucs		  . #x4D79)	; äµ¹
+      )
+     ((=ucs		  . #x9F05)	; 鼅
+      ))
     ))
 (define-char
   '((<-denotational
-     ((=shuowen-jiguge	  . 46915)	; &SW-JIGUGE-46915;
+     ((=>shuowen-jiguge	  . 46915)	; &A-SW-JIGUGE-46915;
       ))
     (shuowen-radical	. 477)	; 黽
     (===shuowen-jiguge5 . 46915)	; &SW-JIGUGE5-46915;
     (<-Small-Seal@shuowen
      ((=ucs		  . #x4D79)	; äµ¹
+      )
+     ((=ucs		  . #x9F05)	; 鼅
       ))
     ))
 (define-char
   '((<-denotational
-     ((=shuowen-jiguge	  . 46915)	; &SW-JIGUGE-46915;
+     ((=>shuowen-jiguge	  . 46915)	; &A-SW-JIGUGE-46915;
       ))
     (shuowen-radical	. 477)	; 黽
     (===shuowen-jiguge4 . 45915)	; &SW-JIGUGE4-45915;
     (<-Small-Seal@shuowen
      ((=ucs		  . #x4D79)	; äµ¹
+      )
+     ((=ucs		  . #x9F05)	; 鼅
       ))
     ))
 (define-char
@@ -172,6 +181,10 @@
     (=shuowen-jiguge	. 46916)	; &SW-JIGUGE-46916;
     (<-Small-Seal@shuowen
      ((=ucs		  . #x27409)	; 𧐉
+      )
+     ((=ucs		  . #x27332)	; 𧌲
+      )
+     ((=ucs		  . #x8718)	; 蜘
       ))
     (<-formed@shuowen
      ((===shuowen-jiguge5 . 46915)	; &SW-JIGUGE5-46915;
@@ -179,6 +192,8 @@
      ((===shuowen-jiguge4 . 45915)	; &SW-JIGUGE4-45915;
       )
      ((=ucs		  . #x4D79)	; äµ¹
+      )
+     ((=ucs		  . #x9F05)	; 鼅
       ))
     (->subsumptive
      ((===shuowen-jiguge5 . 46916)	; &SW-JIGUGE5-46916;
-- 
1.7.10.4