From 5ce2a145dca81b8e77971a382549efa89904c3dc Mon Sep 17 00:00:00 2001
From: tomo <tomo>
Date: Thu, 26 Feb 2004 02:10:24 +0000
Subject: [PATCH] (U+65F6): Unify JC3-51BA instead of JC3-81C3. (JC3-81C3):
 Add `->identical' for U+65F6. (U-00023244): Unify C5-3D55
 instead of using `->identical'; use
 `ideographic-{radical|strokes}@{ucs|cns}'.

---
 lisp/utf-2000/Ideograph-R072-Sun.el |   16 +++++++++++-----
 1 file changed, 11 insertions(+), 5 deletions(-)

diff --git a/lisp/utf-2000/Ideograph-R072-Sun.el b/lisp/utf-2000/Ideograph-R072-Sun.el
index 7529743..8416d82 100644
--- a/lisp/utf-2000/Ideograph-R072-Sun.el
+++ b/lisp/utf-2000/Ideograph-R072-Sun.el
@@ -327,6 +327,12 @@
     (=gb2312		. #x4A31)	; ø»…‚¢
     (=cns11643-3	. #x263D)	; ø»•ž–
     (=daikanwa		. 13772)	; ø¸ƒ—Œ
+    (=jef-china3	. #x51BA)	; øº…†º
+    ))
+(define-char
+  '((->identical
+     ((=ucs		  . #x65F6)	; 时
+      ))
     (=jef-china3	. #x81C3)	; øºˆ‡ƒ
     ))
 (define-char
@@ -4623,13 +4629,13 @@
     (=cns11643-6	. #x5341)	; ø»œ¾¬
     ))
 (define-char
-  '((ideographic-radical . 72)	; ⽇
-    (ideographic-strokes . 9)
+  '((ideographic-radical@ucs . 72)	; ⽇
+    (ideographic-strokes@ucs . 9)
+    (ideographic-radical@cns . 2)	; ⼁
+    (ideographic-strokes@cns . 12)
     (total-strokes	 . 13)
-    (->identical
-     ((=cns11643-5	  . #x3D55)	; ø»š”¨
-      ))
     (=ucs		. #x23244)	; 𣉄
+    (=cns11643-5	. #x3D55)	; ø»š”¨
     ))
 (define-char
   '((=>ucs		. #x23244)	; 𣉄
-- 
1.7.10.4