From: MORIOKA Tomohiko <tomo.git@chise.org>
Date: Wed, 21 Feb 2018 13:44:34 +0000 (+0900)
Subject: (U+31C7): Add intermediate glyph node.
X-Git-Url: http://git.chise.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=c9fa6b56355e10c8cd0cd05ca4c24aaef0f9f4a8;p=chise%2Fxemacs-chise.git.1

(U+31C7): Add intermediate glyph node.
---

diff --git a/lisp/utf-2000/Ideograph-R005-Second.el b/lisp/utf-2000/Ideograph-R005-Second.el
index 9f5da34..aabbe92 100644
--- a/lisp/utf-2000/Ideograph-R005-Second.el
+++ b/lisp/utf-2000/Ideograph-R005-Second.el
@@ -238,12 +238,17 @@
     (=gt-k		. 00025)	; &I-GT-K00025;
     (=gt-pj-k1		. #x3031)	; ㇇ [16-17]
     (->subsumptive
-     ((==gt-k		  . 00025)	; &g2-GT-K00025;
-      (==gt-pj-k1	  . #x3031)	; &g2-GT-K00025; [16-17]
-      )
-     ((==big5-cdp	  . #x8BA2)	; &g2-CDP-8BA2;
-      )
-     ((==ucs@unicode	  . #x31C7)	; &g2-UU+31C7;
+     ((=>>ucs@unicode	  . #x31C7)	; &G-CDP-8BA2;
+      (=>>big5-cdp	  . #x8BA2)	; &G-CDP-8BA2;
+      (=>>gt-k		  . 00025)	; &G-CDP-8BA2;
+      (->subsumptive
+       ((==gt-k		    . 00025)	; &g2-GT-K00025;
+	(==gt-pj-k1	    . #x3031)	; &g2-GT-K00025; [16-17]
+	)
+       ((==big5-cdp	    . #x8BA2)	; &g2-CDP-8BA2;
+	)
+       ((==ucs@unicode	    . #x31C7)	; &g2-UU+31C7;
+	))
       )
      ((=gt-k		  . 00022)	; &GT-K00022;
       (=gt-pj-k1	  . #x3026)	; &GT-K00022; [16-06]