From: MORIOKA Tomohiko <tomo.git@chise.org>
Date: Sun, 8 Sep 2024 19:02:45 +0000 (+0900)
Subject: (SW-JIGUGE-27601): Add U+4E20 as a corresponding modern character.
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=98a79908cb48956a24f6bb18518d4f6841c0bfcb;p=chise%2Fxemacs-chise.git

(SW-JIGUGE-27601): Add U+4E20 as a corresponding modern character.
(SW-JIGUGE-27602): Add U-00024918 and U-000212A3 as corresponding
modern characters; add `<-ancient@shuowen' for SW-JIGUGE-27601.
---

diff --git a/lisp/utf-2000/ShuoWen-SR293.el b/lisp/utf-2000/ShuoWen-SR293.el
index 3de9f35..71dab6f 100644
--- a/lisp/utf-2000/ShuoWen-SR293.el
+++ b/lisp/utf-2000/ShuoWen-SR293.el
@@ -3,6 +3,8 @@
   '((shuowen-radical	. 293)	; 丘
     (=shuowen-jiguge	. 27601)	; &SW-JIGUGE-27601;
     (<-Small-Seal@shuowen
+     ((=ucs		  . #x4E20)	; 丠
+      )
      ((=ucs		  . #x4E18)	; 丘
       ))
     (->subsumptive
@@ -17,8 +19,17 @@
   '((shuowen-radical	. 293)	; 丘
     (=shuowen-jiguge	. 27602)	; &SW-JIGUGE-27602;
     (<-Small-Seal@shuowen
+     ((=ucs		  . #x24918)	; 𤤘
+      )
+     ((=ucs		  . #x212A3)	; 𡊣
+      )
      ((=ucs		  . #x3633)	; 㘳
       ))
+    (<-ancient@shuowen
+     ((=shuowen-jiguge	  . 27601)	; &SW-JIGUGE-27601;
+      )
+     ((=ucs		  . #x4E18)	; 丘
+      ))
     (->subsumptive
      ((===shuowen-jiguge-A30 . 28102)	; &SW-JIGUGE30-28102;
       )