From 98a79908cb48956a24f6bb18518d4f6841c0bfcb Mon Sep 17 00:00:00 2001
From: MORIOKA Tomohiko <tomo.git@chise.org>
Date: Mon, 9 Sep 2024 04:02:45 +0900
Subject: [PATCH] (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.

---
 lisp/utf-2000/ShuoWen-SR293.el |   11 +++++++++++
 1 file changed, 11 insertions(+)

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;
       )
-- 
1.7.10.4