From: MORIOKA Tomohiko <tomo.git@chise.org>
Date: Thu, 2 Nov 2023 10:05:08 +0000 (+0900)
Subject: (SW-JIGUGE-18007): Add U-00024C00, U-00026A04 and U-00024BF7 as
X-Git-Url: http://git.chise.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=78053760515474885a3de4cb1da3741d2bce85b6;p=chise%2Fxemacs-chise.git

(SW-JIGUGE-18007): Add U-00024C00, U-00026A04 and U-00024BF7 as
corresponding modern characters.
(SW-JIGUGE-18008): Add `<-formed@shuowen' for SW-JIGUGE-18007.
---

diff --git a/lisp/utf-2000/ShuoWen-SR200.el b/lisp/utf-2000/ShuoWen-SR200.el
index da4de0b..2b5f5b0 100644
--- a/lisp/utf-2000/ShuoWen-SR200.el
+++ b/lisp/utf-2000/ShuoWen-SR200.el
@@ -33,7 +33,13 @@
   '((shuowen-radical	. 200)	; 䑞
     (=shuowen-jiguge	. 18007)	; &SW-JIGUGE-18007;
     (<-Small-Seal@shuowen
+     ((=ucs		  . #x24C00)	; 𤰀
+      )
      ((=ucs		  . #x26A03)	; 𦨃
+      )
+     ((=ucs		  . #x26A04)	; 𦨄
+      )
+     ((=ucs		  . #x24BF7)	; 𤯷
       ))
     (->subsumptive
      ((===shuowen-jiguge-A30 . 18507)	; &SW-JIGUGE30-18507;
@@ -49,6 +55,15 @@
     (<-Small-Seal@shuowen
      ((=ucs		  . #x845F)	; 葟
       ))
+    (<-formed@shuowen
+     ((=shuowen-jiguge	  . 18007)	; &SW-JIGUGE-18007;
+      )
+     ((=ucs		  . #x24C00)	; 𤰀
+      )
+     ((=ucs		  . #x26A03)	; 𦨃
+      )
+     ((=ucs		  . #x24BF7)	; 𤯷
+      ))
     (->subsumptive
      ((===shuowen-jiguge-A30 . 18508)	; &SW-JIGUGE30-18508;
       )