From: MORIOKA Tomohiko <tomo.git@chise.org>
Date: Sun, 18 Dec 2022 05:44:04 +0000 (+0900)
Subject: (SW-JIGUGE-29103): Add U+770E as a corresponding modern character; add
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=5a0f9da2c605c54bd41f41167205d549bec86a0e;p=chise%2Fxemacs-chise.git

(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
--- 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;
       )