Use `=>shuowen-jiguge' instead of `=shuowen-jiguge' as the CCS-feature
authorMORIOKA Tomohiko <tomo.git@chise.org>
Wed, 22 Jun 2022 01:39:28 +0000 (10:39 +0900)
committerMORIOKA Tomohiko <tomo.git@chise.org>
Wed, 22 Jun 2022 01:39:28 +0000 (10:39 +0900)
of abstract character of Shuowen-Jiguge which has `->denotational' to
combine some Small-Seal glyphs.

lisp/utf-2000/ShuoWen-SR266.el

index e319e50..e0fdcb6 100644 (file)
     ))
 (define-char
   '((shuowen-radical   . 266)  ; 韭
-    (=shuowen-jiguge   . 24502)        ; &SW-JIGUGE-24502;
+    (=>shuowen-jiguge  . 24502)        ; &A-SW-JIGUGE-24502;
+    (<-Small-Seal
+     ((=ucs              . #x4AA2)     ; 䪢
+      )
+     ((=ucs              . #x4AA3)     ; 䪣
+      )
+     ((=ucs              . #x4AA0)     ; 䪠
+      )
+     ((=ucs              . #x4AA1)     ; 䪡
+      ))
     ))
 (define-char
   '((<-denotational
-     ((=shuowen-jiguge   . 24502)      ; &SW-JIGUGE-24502;
+     ((=>shuowen-jiguge          . 24502)      ; &A-SW-JIGUGE-24502;
       ))
     (shuowen-radical   . 266)  ; 韭
     (===shuowen-jiguge5 . 24502)       ; &SW-JIGUGE5-24502;
@@ -45,7 +54,7 @@
     ))
 (define-char
   '((<-denotational
-     ((=shuowen-jiguge   . 24502)      ; &SW-JIGUGE-24502;
+     ((=>shuowen-jiguge          . 24502)      ; &A-SW-JIGUGE-24502;
       ))
     (shuowen-radical   . 266)  ; 韭
     (===shuowen-jiguge4 . 24002)       ; &SW-JIGUGE4-24002;