(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.

diff --git a/lisp/utf-2000/ShuoWen-SR135.el b/lisp/utf-2000/ShuoWen-SR135.el
index 893407b..38cfa7b 100644 (file)
--- 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;
       )