From dced1b194e0ab05348c7ae76f71d892dc24248b3 Mon Sep 17 00:00:00 2001
From: MORIOKA Tomohiko <tomo.git@chise.org>
Date: Wed, 16 Jun 2021 16:19:12 +0900
Subject: [PATCH] (SW-JIGUGE-13502): Add <CJK RADICAL MEAT> as a corresponding
 modern character. (SW-JIGUGE-13922): Add U-000266E6 as a
 corresponding modern character; add `<-ancient@shuowen' for
 SW-JIGUGE-13921. (SW-JIGUGE-13923): Add `<-ancient@shuowen'
 for SW-JIGUGE-13921.

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

diff --git a/lisp/utf-2000/ShuoWen-SR135.el b/lisp/utf-2000/ShuoWen-SR135.el
index 893407b..38cfa7b 100644
--- a/lisp/utf-2000/ShuoWen-SR135.el
+++ b/lisp/utf-2000/ShuoWen-SR135.el
@@ -4,6 +4,9 @@
     (=shuowen-jiguge	. 13502)	; &SW-JIGUGE-13502;
     (<-Small-Seal@shuowen
      ((=ucs		  . #x8089)	; 肉
+      )
+     ((name		  . "CJK RADICAL MEAT")
+      (=ucs		  . #x2EBC)	; ⺼
       ))
     (->subsumptive
      ((===shuowen-jiguge5 . 13502)	; &SW-JIGUGE5-13502;
@@ -1786,6 +1789,13 @@
     (=shuowen-jiguge	. 13922)	; &SW-JIGUGE-13922;
     (<-Small-Seal@shuowen
      ((=ucs		  . #x26778)	; 𦝸
+      )
+     ((=ucs		  . #x266E6)	; 𦛦
+      ))
+    (<-ancient@shuowen
+     ((=shuowen-jiguge	  . 13921)	; &SW-JIGUGE-13921;
+      )
+     ((=ucs		  . #x80B0)	; 肰
       ))
     (->subsumptive
      ((===shuowen-jiguge5 . 13922)	; &SW-JIGUGE5-13922;
@@ -1799,6 +1809,11 @@
     (<-Small-Seal@shuowen
      ((=ucs		  . #x266E1)	; 𦛡
       ))
+    (<-ancient@shuowen
+     ((=shuowen-jiguge	  . 13921)	; &SW-JIGUGE-13921;
+      )
+     ((=ucs		  . #x80B0)	; 肰
+      ))
     (->subsumptive
      ((===shuowen-jiguge5 . 13923)	; &SW-JIGUGE5-13923;
       )
-- 
1.7.10.4