(SW-JIGUGE-29103): Add U+770E as a corresponding modern character; add

`<-ancient@shuowen' for SW-JIGUGE-29102.
(SW-JIGUGE-29104): Add `<-ancient@shuowen' for SW-JIGUGE-29102.

diff --git a/lisp/utf-2000/ShuoWen-SR318.el b/lisp/utf-2000/ShuoWen-SR318.el
index db51551..f7b4937 100644 (file)
--- a/lisp/utf-2000/ShuoWen-SR318.el
+++ b/lisp/utf-2000/ShuoWen-SR318.el
@@ -32,6 +32,13 @@
     (=shuowen-jiguge   . 29103)        ; &SW-JIGUGE-29103;
     (<-Small-Seal@shuowen
      ((=ucs              . #x25119)    ; 𥄙
+      )
+     ((=ucs              . #x770E)     ; 眎
+      ))
+    (<-ancient@shuowen
+     ((=shuowen-jiguge   . 29102)      ; &SW-JIGUGE-29102;
+      )
+     ((=ucs              . #x8996)     ; 視
       ))
     (->subsumptive
      ((===shuowen-jiguge-A30 . 29603)  ; &SW-JIGUGE30-29603;
@@ -47,6 +54,11 @@
     (<-Small-Seal@shuowen
      ((=ucs              . #x7721)     ; 眡
       ))
+    (<-ancient@shuowen
+     ((=shuowen-jiguge   . 29102)      ; &SW-JIGUGE-29102;
+      )
+     ((=ucs              . #x8996)     ; 視
+      ))
     (->subsumptive
      ((===shuowen-jiguge-A30 . 29604)  ; &SW-JIGUGE30-29604;
       )