(SW-JIGUGE-22600): Add U-000232A1 as a corresponding modern character.

(SW-JIGUGE-22601): Add U+3B25 as a corresponding modern character.
(SW-JIGUGE-22602): Add `<-ancient@shuowen' for SW-JIGUGE-22601.

diff --git a/lisp/utf-2000/ShuoWen-SR231.el b/lisp/utf-2000/ShuoWen-SR231.el
index aace72a..ec8409d 100644 (file)
--- a/lisp/utf-2000/ShuoWen-SR231.el
+++ b/lisp/utf-2000/ShuoWen-SR231.el
@@ -736,6 +736,8 @@
     (=shuowen-jiguge   . 22600)        ; &SW-JIGUGE-22600;
     (<-Small-Seal@shuowen
      ((=ucs              . #x3B0E)     ; 㬎
+      )
+     ((=ucs              . #x232A1)    ; 𣊡
       ))
     (->subsumptive
      ((===shuowen-jiguge5 . 22600)     ; &SW-JIGUGE5-22600;
@@ -747,6 +749,8 @@
   '((shuowen-radical   . 231)  ; 日
     (=shuowen-jiguge   . 22601)        ; &SW-JIGUGE-22601;
     (<-Small-Seal@shuowen
+     ((=ucs              . #x3B25)     ; 㬥
+      )
      ((=ucs              . #x66B4)     ; 暴
       ))
     (->subsumptive
@@ -763,6 +767,13 @@
       )
      ((=ucs              . #x232F3)    ; 𣋳
       ))
+    (<-ancient@shuowen
+     ((=shuowen-jiguge   . 22601)      ; &SW-JIGUGE-22601;
+      )
+     ((=ucs              . #x3B25)     ; 㬥
+      )
+     ((=ucs              . #x66B4)     ; 暴
+      ))
     (->subsumptive
      ((===shuowen-jiguge5 . 22602)     ; &SW-JIGUGE5-22602;
       )