From: MORIOKA Tomohiko <tomo.git@chise.org>
Date: Fri, 20 Aug 2021 14:24:38 +0000 (+0900)
Subject: (SW-JIGUGE-26919): Add U+3474 as a corresponding modern character.
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=6267939c5b9e6587cc067562e3464126c7ddc854;p=chise%2Fxemacs-chise.git

(SW-JIGUGE-26919): Add U+3474 as a corresponding modern character.
(SW-JIGUGE-27019): Add U+345E-itaiji-001 as a corresponding modern
character.
(SW-JIGUGE-27203): Add `<-ancient@shuowen' for SW-JIGUGE-27202.
---

diff --git a/lisp/utf-2000/ShuoWen-SR287.el b/lisp/utf-2000/ShuoWen-SR287.el
index 98f1312..d04367c 100644
--- a/lisp/utf-2000/ShuoWen-SR287.el
+++ b/lisp/utf-2000/ShuoWen-SR287.el
@@ -1699,6 +1699,8 @@
   '((shuowen-radical	. 287)	; 人
     (=shuowen-jiguge	. 26919)	; &SW-JIGUGE-26919;
     (<-Small-Seal@shuowen
+     ((=ucs		  . #x3474)	; 㑴
+      )
      ((=ucs		  . #x4FB5)	; ä¾µ
       ))
     (->subsumptive
@@ -2065,6 +2067,8 @@
     (<-Small-Seal@shuowen
      ((=ucs		  . #x345E)	; 㑞
       )
+     ((=ucs-itaiji-001	  . #x345E)	; &U-i001+345E;
+      )
      ((=ucs		  . #x2022A)	; 𠈪
       ))
     (->subsumptive
@@ -2573,6 +2577,11 @@
     (<-Small-Seal@shuowen
      ((=ucs		  . #x3444)	; 㑄
       ))
+    (<-ancient@shuowen
+     ((=shuowen-jiguge	  . 27202)	; &SW-JIGUGE-27202;
+      )
+     ((=ucs		  . #x4FAE)	; ä¾®
+      ))
     (->subsumptive
      ((===shuowen-jiguge5 . 27203)	; &SW-JIGUGE5-27203;
       )