From 3f8ec22f3f9e64e6a56f083ee3b3d86eebee46d3 Mon Sep 17 00:00:00 2001
From: MORIOKA Tomohiko <tomo.git@chise.org>
Date: Thu, 12 Aug 2021 20:48:56 +0900
Subject: [PATCH] (SW-JIGUGE-24803): Add U+5BE2 and U+5BDD as corresponding
 modern characters. (SW-JIGUGE-24804): Add U-00020597 as a
 corresponding modern character; add `<-Zhouwen@shuowen' for
 SW-JIGUGE-24803. (SW-JIGUGE-24820): Add `<-formed@shuowen'
 for SW-JIGUGE-24819.

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

diff --git a/lisp/utf-2000/ShuoWen-SR269.el b/lisp/utf-2000/ShuoWen-SR269.el
index 0e87013..f6e6fb0 100644
--- a/lisp/utf-2000/ShuoWen-SR269.el
+++ b/lisp/utf-2000/ShuoWen-SR269.el
@@ -728,6 +728,10 @@
     (=shuowen-jiguge	. 24803)	; &SW-JIGUGE-24803;
     (<-Small-Seal@shuowen
      ((=ucs		  . #x5BD1)	; 寑
+      )
+     ((=ucs		  . #x5BE2)	; 寢
+      )
+     ((=ucs		  . #x5BDD)	; 寝
       ))
     (->subsumptive
      ((===shuowen-jiguge5 . 24803)	; &SW-JIGUGE5-24803;
@@ -739,8 +743,19 @@
   '((shuowen-radical	. 269)	; 宀
     (=shuowen-jiguge	. 24804)	; &SW-JIGUGE-24804;
     (<-Small-Seal@shuowen
+     ((=ucs		  . #x20597)	; 𠖗
+      )
      ((=ucs		  . #x21A60)	; ð¡© 
       ))
+    (<-Zhouwen@shuowen
+     ((=shuowen-jiguge	  . 24803)	; &SW-JIGUGE-24803;
+      )
+     ((=ucs		  . #x5BD1)	; 寑
+      )
+     ((=ucs		  . #x5BE2)	; 寢
+      )
+     ((=ucs		  . #x5BDD)	; 寝
+      ))
     (->subsumptive
      ((===shuowen-jiguge5 . 24804)	; &SW-JIGUGE5-24804;
       )
@@ -937,6 +952,11 @@
     (<-Small-Seal@shuowen
      ((=ucs		  . #x25A41)	; 𥩁
       ))
+    (<-formed@shuowen
+     ((=shuowen-jiguge	  . 24819)	; &SW-JIGUGE-24819;
+      )
+     ((=ucs		  . #x21AEC)	; 𡫬
+      ))
     (->subsumptive
      ((===shuowen-jiguge5 . 24820)	; &SW-JIGUGE5-24820;
       )
-- 
1.7.10.4