From: tomo <tomo>
Date: Mon, 11 Jul 2011 19:47:25 +0000 (+0000)
Subject: (mother of C1-764D): Unify G-CU+6726 and G-M-14409.
X-Git-Tag: r21-4-22-chise-0_25-10^20~350
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=5f8df41e167fc735aaf795ab7a2ffff323ed3db9;p=chise%2Fxemacs-chise.git-

(mother of C1-764D): Unify G-CU+6726 and G-M-14409.
(mother of J0-5B2F): Unify G-UU+6726, G-J0-5B2F, G-GT-18322 and
G-HD-FT2238.
(HD-FT2238): New character.
---

diff --git a/lisp/utf-2000/Ideograph-R074-Moon.el b/lisp/utf-2000/Ideograph-R074-Moon.el
index 1b1737a..af09706 100644
--- a/lisp/utf-2000/Ideograph-R074-Moon.el
+++ b/lisp/utf-2000/Ideograph-R074-Moon.el
@@ -1685,10 +1685,13 @@
     (ideographic-radical . 74)	; ⽉
     (ideographic-strokes . 14)
     (total-strokes	 . 18)
+    (=>>ucs@cns		. #x6726)	; &G-CU+6726;
+    (=>>daikanwa	. 14409)	; &G-CU+6726;
     (->subsumptive
      ((=daikanwa	  . 14409)	; &M-14409;
       )
-     ((=cns11643-1	  . #x764D)	; &C1-764D; [86-45]
+     ((=ucs@cns		  . #x6726)	; &C1-764D;
+      (=cns11643-1	  . #x764D)	; &C1-764D; [86-45]
       ))
     ))
 (define-char
@@ -1698,6 +1701,11 @@
     (ideographic-radical . 74)	; ⽉
     (ideographic-strokes . 13)
     (total-strokes	 . 17)
+    (=>>ucs@unicode	. #x6726)	; &G-GT-18322;
+    (=>>jis-x0208	. #x5B2F)	; &G-GT-18322; [59-15]
+    (=>>jis-x0213-1	. #x5B2F)	; &G-GT-18322; [59-15]
+    (=>>gt		. 18322)	; &G-GT-18322;
+    (=>>hanyo-denshi/ft . #x3646)	; &G-GT-18322; [22-38]
     (->subsumptive
      ((=ucs@jis		  . #x6726)	; &GT-18322;
       (=jis-x0208	  . #x5B2F)	; &GT-18322; [59-15]
@@ -1708,6 +1716,13 @@
       )
      ((=ucs@unicode	  . #x6726)	; &G0-6B7C;
       (=gb2312		  . #x6B7C)	; &G0-6B7C; [75-92]
+      )
+     ((=decomposition@hanyo-denshi
+       ((=ucs		    . #x6726)	; 朦
+	)
+       ((=ucs		    . #xE0103)	; 󠄃
+	))
+      (=hanyo-denshi/ft	  . #x3646)	; 朦󠄃 [22-38]
       ))
     ))
 (define-char