From 56069b7a0018f0d9345ccb0f9325b13f5b6fd39d Mon Sep 17 00:00:00 2001
From: tomo <tomo>
Date: Fri, 22 Apr 2005 07:37:29 +0000
Subject: [PATCH] (U+91D2): Add `<-ideographic-component-forms' for U+91D1.
 (U+9485): Likewise. (BC-8DE3): Likewise.

---
 lisp/utf-2000/Ideograph-R167-Gold.el |   18 ++++++++++++++++++
 1 file changed, 18 insertions(+)

diff --git a/lisp/utf-2000/Ideograph-R167-Gold.el b/lisp/utf-2000/Ideograph-R167-Gold.el
index 3ca6d17..ccbc66e 100644
--- a/lisp/utf-2000/Ideograph-R167-Gold.el
+++ b/lisp/utf-2000/Ideograph-R167-Gold.el
@@ -18,6 +18,9 @@
   '((ideographic-radical . 167)	; ⾦
     (ideographic-strokes . 0)
     (total-strokes	 . 8)
+    (<-ideographic-component-forms
+     ((=ucs		  . #x91D1)	; 金
+      ))
     (=ucs		. #x91D2)	; 釒
     (=gb12345		. #x6E44)	; 釒 [78-36]
     ))
@@ -25,12 +28,27 @@
   '((ideographic-radical . 167)	; ⾦
     (ideographic-strokes . 0)
     (total-strokes	 . 5)
+    (<-ideographic-component-forms
+     ((=ucs		  . #x91D1)	; 金
+      ))
     (=ucs		. #x9485)	; 钅
     (=gb2312		. #x6E44)	; &I-G0-6E44; [78-36]
     (=big5-cdp		. #x895A)	; &I-CDP-895A;
     ))
 (define-char
   '((ideographic-radical . 167)	; ⾦
+    (ideographic-strokes . 0)
+    (total-strokes	 . 6)
+    (<-ideographic-component-forms
+     ((=ucs		  . #x91D1)	; 金
+      ))
+    (<-simplified@component
+     ((=ucs		  . #x91D1)	; 金
+      ))
+    (=big5-cdp		. #x8DE3)	; &CDP-8DE3;
+    ))
+(define-char
+  '((ideographic-radical . 167)	; ⾦
     (ideographic-strokes . 1)
     (total-strokes	 . 9)
     (=ucs		. #x91D3)	; 釓
-- 
1.7.10.4