(SW-JIGUGE-05100): Add U+6630 as a corresponding modern character.

(SW-JIGUGE-05101): Add `<-Zhouwen@shuowen' for SW-JIGUGE-05100.

diff --git a/lisp/utf-2000/ShuoWen-SR032.el b/lisp/utf-2000/ShuoWen-SR032.el
index 6fc9e7f..55dbdb9 100644 (file)
--- a/lisp/utf-2000/ShuoWen-SR032.el
+++ b/lisp/utf-2000/ShuoWen-SR032.el
@@ -3,6 +3,8 @@
   '((shuowen-radical   . 32)   ; 是
     (=shuowen-jiguge   . 05100)        ; &SW-JIGUGE-05100;
     (<-Small-Seal@shuowen
+     ((=ucs              . #x6630)     ; 昰
+      )
      ((=ucs              . #x662F)     ; 是
       ))
     (->subsumptive
@@ -17,6 +19,13 @@
     (<-Small-Seal@shuowen
      ((=ucs              . #x2319E)    ; 𣆞
       ))
+    (<-Zhouwen@shuowen
+     ((=shuowen-jiguge   . 05100)      ; &SW-JIGUGE-05100;
+      )
+     ((=ucs              . #x6630)     ; 昰
+      )
+     ((=ucs              . #x662F)     ; 是
+      ))
     (->subsumptive
      ((===shuowen-jiguge5 . 05101)     ; &SW-JIGUGE5-05101;
       )