From 87fed9ce4933221ffb22cba1eaa6b95f2112cd1e Mon Sep 17 00:00:00 2001
From: tomo <tomo>
Date: Fri, 1 Aug 2003 03:27:06 +0000
Subject: [PATCH] (C4-2127): Unify GT-K00068. (U-00020061): Don't use char-ref
 format in `<->same-ideograph' and `<-ancient-ideograph';
 use `->same-ideograph*sources' and
 `<-ancient-ideograph*sources' instead.

---
 lisp/utf-2000/Ideograph-R002-Line.el |   14 ++++++++------
 1 file changed, 8 insertions(+), 6 deletions(-)

diff --git a/lisp/utf-2000/Ideograph-R002-Line.el b/lisp/utf-2000/Ideograph-R002-Line.el
index 00ee22a..4a12bac 100644
--- a/lisp/utf-2000/Ideograph-R002-Line.el
+++ b/lisp/utf-2000/Ideograph-R002-Line.el
@@ -37,6 +37,8 @@
     (ideographic-strokes . 1)
     (total-strokes	 . 2)
     (=cns11643-4	. #x2127)	; ø»— ®
+    (=gt-pj-k1		. #x735C)	; ø»— ®
+    (=gt-k		. 00068)	; ý¡„€„
     (=ucs@cns		. #x4E29)	; ø»— ®
     ))
 (define-char
@@ -44,15 +46,15 @@
     (ideographic-strokes . 1)
     (total-strokes	 . 2)
     (->same-ideograph
-     (:sources	(morohashi-daikanwa)
-      :char	((=daikanwa	     . 02775)	; ø¸€«—
-		 )
+     ((=daikanwa	  . 02775)	; ø¸€«—
       ))
+    (->same-ideograph*sources
+     daikanwa)
     (<-ancient-ideograph
-     (:sources	(morohashi-daikanwa)
-      :char	((=daikanwa	     . 02774)	; ø¸€«–
-		 )
+     ((=daikanwa	  . 02774)	; ø¸€«–
       ))
+    (<-ancient-ideograph*sources
+     daikanwa)
     (hanyu-dazidian	1 28 4)
     (=gt-pj-2		. #x3055)	; ý¡€€§
     (=daikanwa		. 00069)	; ø¸€…
-- 
1.7.10.4