From: MORIOKA Tomohiko <tomo.git@chise.org>
Date: Thu, 24 Jun 2021 13:49:11 +0000 (+0900)
Subject: (SW-JIGUGE-16808): Add A-IWDSU+98DF as a corresponding modern
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=183217ae047a086e4863ff1e765dd9ef36a4d65e;p=chise%2Fxemacs-chise.git

(SW-JIGUGE-16808): Add A-IWDSU+98DF as a corresponding modern
character.
(SW-JIGUGE-17020): Add `<-formed@shuowen' for SW-JIGUGE-17019.
(SW-JIGUGE-17021): Add U-00029782 as a corresponding modern character;
add `<-Zhouwen@shuowen' for SW-JIGUGE-17019.
(SW-JIGUGE-17029): Add U+9927 as a corresponding modern character.
---

diff --git a/lisp/utf-2000/ShuoWen-SR180.el b/lisp/utf-2000/ShuoWen-SR180.el
index a0b0f0a..3e47394 100644
--- a/lisp/utf-2000/ShuoWen-SR180.el
+++ b/lisp/utf-2000/ShuoWen-SR180.el
@@ -8,6 +8,8 @@
      ((=ucs		  . #x29681)	; 𩚁
       )
      ((=ucs		  . #x98DF)	; 食
+      )
+     ((=>ucs@iwds-1	  . #x98DF)	; &A-IWDSU+98DF;
       ))
     (->subsumptive
      ((===shuowen-jiguge5 . 16808)	; &SW-JIGUGE5-16808;
@@ -769,6 +771,11 @@
     (<-Small-Seal@shuowen
      ((=ucs		  . #x53E8)	; 叨
       ))
+    (<-formed@shuowen
+     ((=shuowen-jiguge	  . 17019)	; &SW-JIGUGE-17019;
+      )
+     ((=ucs		  . #x9955)	; 饕
+      ))
     (->subsumptive
      ((===shuowen-jiguge5 . 17020)	; &SW-JIGUGE5-17020;
       )
@@ -780,6 +787,13 @@
     (=shuowen-jiguge	. 17021)	; &SW-JIGUGE-17021;
     (<-Small-Seal@shuowen
      ((=ucs		  . #x27210)	; 𧈐
+      )
+     ((=ucs		  . #x29782)	; 𩞂
+      ))
+    (<-Zhouwen@shuowen
+     ((=shuowen-jiguge	  . 17019)	; &SW-JIGUGE-17019;
+      )
+     ((=ucs		  . #x9955)	; 饕
       ))
     (->subsumptive
      ((===shuowen-jiguge5 . 17021)	; &SW-JIGUGE5-17021;
@@ -875,6 +889,8 @@
   '((shuowen-radical	. 180)	; 食
     (=shuowen-jiguge	. 17029)	; &SW-JIGUGE-17029;
     (<-Small-Seal@shuowen
+     ((=ucs		  . #x9927)	; 餧
+      )
      ((=ucs		  . #x9912)	; 餒
       ))
     (->subsumptive