From 7fe3f89ec6ee96ada2a7fcd4232568bed67734d7 Mon Sep 17 00:00:00 2001
From: MORIOKA Tomohiko <tomo.git@chise.org>
Date: Sun, 4 Sep 2022 23:53:24 +0900
Subject: [PATCH] (SW-JIGUGE-05005): Add `<-ancient@shuowen' for
 SW-JIGUGE4-04904 and SW-JIGUGE-05004. (SW-JIGUGE-05006):
 Add U-00023954 as a corresponding modern character; add
 `<-ancient@shuowen' for SW-JIGUGE4-04904 and
 SW-JIGUGE-05004.

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

diff --git a/lisp/utf-2000/ShuoWen-SR031.el b/lisp/utf-2000/ShuoWen-SR031.el
index 0c609c7..b1016e1d 100644
--- a/lisp/utf-2000/ShuoWen-SR031.el
+++ b/lisp/utf-2000/ShuoWen-SR031.el
@@ -33,6 +33,13 @@
     (<-Small-Seal@shuowen
      ((=ucs		  . #x3C4F)	; 㱏
       ))
+    (<-ancient@shuowen
+     ((===shuowen-jiguge4 . 04904)	; &SW-JIGUGE4-04904;
+      )
+     ((=shuowen-jiguge	  . 05004)	; &SW-JIGUGE-05004;
+      )
+     ((=ucs		  . #x6B63)	; æ­£
+      ))
     (->subsumptive
      ((===shuowen-jiguge5 . 05005)	; &SW-JIGUGE5-05005;
       )
@@ -44,6 +51,15 @@
     (=shuowen-jiguge	. 05006)	; &SW-JIGUGE-05006;
     (<-Small-Seal@shuowen
      ((=ucs		  . #x27FB8)	; 𧾸
+      )
+     ((=ucs		  . #x23954)	; 𣥔
+      ))
+    (<-ancient@shuowen
+     ((===shuowen-jiguge4 . 04904)	; &SW-JIGUGE4-04904;
+      )
+     ((=shuowen-jiguge	  . 05004)	; &SW-JIGUGE-05004;
+      )
+     ((=ucs		  . #x6B63)	; æ­£
       ))
     (->subsumptive
      ((===shuowen-jiguge5 . 05006)	; &SW-JIGUGE5-05006;
-- 
1.7.10.4