From 7e1ff2934e88661086acc908b29124f5f835eebd Mon Sep 17 00:00:00 2001
From: tomo <tomo>
Date: Mon, 13 Jan 2003 09:43:44 +0000
Subject: [PATCH] (U+20089): Use `name*' instead of `name' for non-standard
 name; rename <cjk radical person for top> to <ideographic
 component person for top>; add `:sources' of `:radical' and
 `:strokes'.

---
 lisp/utf-2000/Ideograph-R004-Slash.el |   11 +++++++----
 1 file changed, 7 insertions(+), 4 deletions(-)

diff --git a/lisp/utf-2000/Ideograph-R004-Slash.el b/lisp/utf-2000/Ideograph-R004-Slash.el
index 8527d9e..acacbe4 100644
--- a/lisp/utf-2000/Ideograph-R004-Slash.el
+++ b/lisp/utf-2000/Ideograph-R004-Slash.el
@@ -199,11 +199,13 @@
     (ideograph-gt	. 00159)	; ý¡€€‚Ÿ
     ))
 (define-char
-  '((name		. "cjk radical person for top")
+  '((name*		. "ideographic component person for top")
     (ideographic-	(:radical	4 ; ⼃
-			 :strokes	1)
+			 :strokes	1
+			 :sources	(ucs))
 			(:radical	1 ; ⼀
-			 :strokes	1)
+			 :strokes	1
+			 :sources	(gt))
 			(:radical	9 ; ⼈
 			 :strokes	0))
     (total-strokes	 . 2)
@@ -629,7 +631,8 @@
       )
      ((ucs		  . #x4E3F)	; 丿
       )
-     ((korean-ksc5601	  . #x717D)	; ø»Š‘ˆ
+     ((=jis-x0208	  . #x4737)	; ø½Š®†
+      (korean-ksc5601	  . #x717D)	; ø»Š‘ˆ
       (ideograph-daikanwa . 00125)	; ø¸€½
       ))
     (shinjigen-1	. 52)
-- 
1.7.10.4