From: MORIOKA Tomohiko <tomo.git@chise.org>
Date: Tue, 4 Apr 2017 17:20:42 +0000 (+0900)
Subject: (G-CU+27C28): New node to subsume g2-CU+27C28 and GT-K02141; use
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=df3a8e1f1584ac4d02780d80b01e323b6ae60b51;p=chise%2Fxemacs-chise.git-

(G-CU+27C28): New node to subsume g2-CU+27C28 and GT-K02141; use
`<-subsumptive' for U-00027C28.
---

diff --git a/lisp/utf-2000/Ideograph-R152-Pig.el b/lisp/utf-2000/Ideograph-R152-Pig.el
index 12610fb..afc35f0 100644
--- a/lisp/utf-2000/Ideograph-R152-Pig.el
+++ b/lisp/utf-2000/Ideograph-R152-Pig.el
@@ -135,17 +135,21 @@
       )
      ((==ucs@iso	  . #x27C28)	; &g2-IU-00027C28;
       )
-     ((==ucs@cns	  . #x27C28)	; &g2-CDP-8BC9;
-      (==cns11643-5	  . #x2329)	; &g2-CDP-8BC9; [03-09]
-      (==big5-cdp	  . #x8BC9)	; &g2-CDP-8BC9;
+     ((=>>ucs@cns	  . #x27C28)	; &G-CDP-8BC9;
+      (=>>big5-cdp	  . #x8BC9)	; &G-CDP-8BC9;
       (->subsumptive
-       ((===big5-cdp	    . #x8BC9)	; &R-CDP-8BC9;
+       ((==ucs@cns	    . #x27C28)	; &g2-CDP-8BC9;
+	(==cns11643-5	    . #x2329)	; &g2-CDP-8BC9; [03-09]
+	(==big5-cdp	    . #x8BC9)	; &g2-CDP-8BC9;
+	(->subsumptive
+	 ((===big5-cdp	      . #x8BC9)	; &R-CDP-8BC9;
+	  )
+	 ((===cns11643-5      . #x2329)	; &R-C5-2329; [03-09]
+	  ))
 	)
-       ((===cns11643-5	    . #x2329)	; &R-C5-2329; [03-09]
+       ((=gt-k		    . 02141)	; &GT-K02141;
+	(=gt-pj-k1	    . #x3461)	; &GT-K02141; [20-65]
 	))
-      )
-     ((=gt-k		  . 02141)	; &GT-K02141;
-      (=gt-pj-k1	  . #x3461)	; &GT-K02141; [20-65]
       ))
     ))
 (define-char