From: MORIOKA Tomohiko <tomo.git@chise.org>
Date: Tue, 21 Jun 2022 20:47:59 +0000 (+0900)
Subject: (SW-JIGUGE-44201): Add U-00024A1D as a corresponding modern character.
X-Git-Url: http://git.chise.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=0d31a7029e528b2d69cfc6ed7290fd6beba063dd;p=chise%2Fxemacs-chise.git

(SW-JIGUGE-44201): Add U-00024A1D as a corresponding modern character.
(SW-JIGUGE-44202): Add U+3ECE as a corresponding modern character; add
`<-ancient@shuowen' for SW-JIGUGE-44201.
---

diff --git a/lisp/utf-2000/ShuoWen-SR455.el b/lisp/utf-2000/ShuoWen-SR455.el
index 9ce76bb..1d71670 100644
--- a/lisp/utf-2000/ShuoWen-SR455.el
+++ b/lisp/utf-2000/ShuoWen-SR455.el
@@ -27,6 +27,8 @@
   '((shuowen-radical	. 455)	; 琴
     (=shuowen-jiguge	. 44201)	; &SW-JIGUGE-44201;
     (<-Small-Seal@shuowen
+     ((=ucs		  . #x24A1D)	; 𤨝
+      )
      ((=ucs		  . #x745F)	; 瑟
       ))
     (->subsumptive
@@ -40,6 +42,15 @@
     (=shuowen-jiguge	. 44202)	; &SW-JIGUGE-44202;
     (<-Small-Seal@shuowen
      ((=ucs		  . #x2163C)	; 𡘼
+      )
+     ((=ucs		  . #x3ECE)	; 㻎
+      ))
+    (<-ancient@shuowen
+     ((=shuowen-jiguge	  . 44201)	; &SW-JIGUGE-44201;
+      )
+     ((=ucs		  . #x24A1D)	; 𤨝
+      )
+     ((=ucs		  . #x745F)	; 瑟
       ))
     (->subsumptive
      ((===shuowen-jiguge5 . 44202)	; &SW-JIGUGE5-44202;