From: tomo <tomo>
Date: Mon, 13 Jan 2003 09:43:44 +0000 (+0000)
Subject: (U+20089): Use `name*' instead of `name' for non-standard name; rename
X-Git-Tag: r21-4-10-utf-2000-0_20-5~281
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=7e1ff2934e88661086acc908b29124f5f835eebd;p=chise%2Fxemacs-chise.git-

(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'.
---

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)