From 9b7bb8e5e6b5d9712b7a0fccb13b7e306a400ef0 Mon Sep 17 00:00:00 2001
From: tomo <tomo>
Date: Sat, 8 Jan 2005 07:28:49 +0000
Subject: [PATCH] (U+8C69): Use `->subsumptive'. (U+8C6A): Likewise.

---
 lisp/utf-2000/Ideograph-R152-Pig.el |   49 +++++++++++++++++++----------------
 1 file changed, 27 insertions(+), 22 deletions(-)

diff --git a/lisp/utf-2000/Ideograph-R152-Pig.el b/lisp/utf-2000/Ideograph-R152-Pig.el
index 758de6f..0e4c942 100644
--- a/lisp/utf-2000/Ideograph-R152-Pig.el
+++ b/lisp/utf-2000/Ideograph-R152-Pig.el
@@ -736,33 +736,38 @@
     (ideographic-strokes . 7)
     (total-strokes	 . 14)
     (=ucs		. #x8C69)	; 豩
-    (=jis-x0212		. #x5E77)	; &I-JSP-5E77; [62-87]
-    (=cns11643-2	. #x4E3A)	; &I-C2-4E3A; [46-26]
-    (=jis-x0213-2-2000	. #x7922)	; &I-JX2-7922; [89-02]
-    (=daikanwa		. 36405)	; &I-M-36405;
-    ))
-(define-char
-  '((=>ucs		. #x8C6A)	; 豪
-    (ideographic-radical . 152)	; ⾗
-    (ideographic-strokes . 7)
-    (total-strokes	 . 14)
-    (shinjigen-2	. 7825)
-    (=jis-x0208		. #x396B)	; &GT-48813; [25-75]
-    (=ks-x1001		. #x7B5F)	; &I-K0-7B5F; [91-63]
-    (=gt		. 48813)	; &I-GT-48813;
-    (=gt-k		. 11121)	; &I-GT-K11121;
-    (=gt-pj-1		. #x396B)	; &I-GT-48813; [25-75]
-    (=daikanwa		. 36406)	; &I-M-36406;
-    (=ucs@jis		. #x8C6A)	; &GT-48813;
+    (->subsumptive
+     ((=daikanwa	  . 36405)	; &M-36405;
+      )
+     ((=jis-x0212	  . #x5E77)	; &JX2-7922; [62-87]
+      (=jis-x0213-2-2000  . #x7922)	; &I-JX2-7922; [89-02]
+      (=ucs@jis		  . #x8C69)	; &JX2-7922;
+      )
+     ((=ucs@unicode	  . #x8C69)	; &UU+8C69;
+      )
+     ((=cns11643-2	  . #x4E3A)	; &C2-4E3A; [46-26]
+      ))
     ))
 (define-char
-  '((morohashi-daikanwa	36406 0 0)
-    (ideographic-radical . 152)	; ⾗
+  '((ideographic-radical . 152)	; ⾗
     (ideographic-strokes . 7)
     (total-strokes	 . 14)
     (=ucs		. #x8C6A)	; 豪
-    (=gb2312		. #x3A40)	; &I-G0-3A40; [26-32]
-    (=cns11643-1	. #x6B30)	; &I-C1-6B30; [75-16]
+    (->subsumptive
+     ((shinjigen-2	  . 7825)
+      (=jis-x0208	  . #x396B)	; &GT-48813; [25-75]
+      (=ks-x1001	  . #x7B5F)	; &I-K0-7B5F; [91-63]
+      (=gt		  . 48813)	; &I-GT-48813;
+      (=gt-k		  . 11121)	; &I-GT-K11121;
+      (=gt-pj-1		  . #x396B)	; &I-GT-48813; [25-75]
+      (=daikanwa	  . 36406)	; &I-M-36406;
+      (=ucs@jis		  . #x8C6A)	; &GT-48813;
+      )
+     ((=gb2312		  . #x3A40)	; &G0-3A40; [26-32]
+      (=ucs@unicode	  . #x8C6A)	; &G0-3A40;
+      )
+     ((=cns11643-1	  . #x6B30)	; &C1-6B30; [75-16]
+      ))
     ))
 (define-char
   '((ideographic-radical . 152)	; ⾗
-- 
1.7.10.4