From: MORIOKA Tomohiko <tomo.git@chise.org>
Date: Mon, 20 Jun 2022 08:06:59 +0000 (+0900)
Subject: Use `=>shuowen-jiguge' instead of `=shuowen-jiguge' as the CCS-feature
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=c6c3454454a9b0d67919d86852138a788d9a7f35;p=chise%2Fxemacs-chise.git

Use `=>shuowen-jiguge' instead of `=shuowen-jiguge' as the CCS-feature
of abstract character of Shuowen-Jiguge which has `->denotational' to
combine some Small-Seal glyphs.
---

diff --git a/lisp/utf-2000/ShuoWen-SR031.el b/lisp/utf-2000/ShuoWen-SR031.el
index 67821c8..832aea3 100644
--- a/lisp/utf-2000/ShuoWen-SR031.el
+++ b/lisp/utf-2000/ShuoWen-SR031.el
@@ -1,14 +1,14 @@
 ;; -*- coding: utf-8-mcs-er -*-
 (define-char
   '((shuowen-radical	. 31)	; æ­£
-    (=shuowen-jiguge	. 05004)	; &SW-JIGUGE-05004;
-    (<-Small-Seal@shuowen
+    (=>shuowen-jiguge	. 05004)	; &A-SW-JIGUGE-05004;
+    (<-Small-Seal
      ((=ucs		  . #x6B63)	; æ­£
       ))
     ))
 (define-char
   '((<-denotational
-     ((=shuowen-jiguge	  . 05004)	; &SW-JIGUGE-05004;
+     ((=>shuowen-jiguge	  . 05004)	; &A-SW-JIGUGE-05004;
       ))
     (===shuowen-jiguge5 . 05004)	; &SW-JIGUGE5-05004;
     (<-Small-Seal@shuowen
@@ -17,7 +17,7 @@
     ))
 (define-char
   '((<-denotational
-     ((=shuowen-jiguge	  . 05004)	; &SW-JIGUGE-05004;
+     ((=>shuowen-jiguge	  . 05004)	; &A-SW-JIGUGE-05004;
       ))
     (===shuowen-jiguge4 . 04904)	; &SW-JIGUGE4-04904;
     (<-Small-Seal@shuowen