(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-R001-One.el b/lisp/utf-2000/Ideograph-R001-One.el
index 62058eb..1a8ffd1 100644 (file)
--- a/lisp/utf-2000/Ideograph-R001-One.el
+++ b/lisp/utf-2000/Ideograph-R001-One.el
@@ -191,11 +191,13 @@
     (ucs               . #x20001)      ; 𠀁
     ))
 (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)
@@ -633,7 +635,8 @@
      ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
       (ucs               . #x2FF1)     ; ⿱
       )
-     ((chinese-cns11643-6 . #x2138)    ; �����
+     ((=jis-x0208        . #x3F4F)     ; �����
+      (chinese-cns11643-6 . #x2138)    ; �����
       (ideograph-daikanwa . 01850)     ; �����
       )
      ((ucs               . #x4E00)     ; 一
@@ -800,7 +803,8 @@
     (ideographic-strokes . 4)
     (total-strokes      . 5)
     (ideographic-structure
-     ((ucs               . #x2FF1)     ; ⿱
+     ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
+      (ucs               . #x2FF1)     ; ⿱
       )
      ((chinese-big5-cdp          . #x89D7)     ; ������
       )
@@ -1994,7 +1998,7 @@
      ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
       (ucs               . #x2FF1)     ; ⿱
       )
-     ((chinese-big5-cdp          . #x8B53)     ; ������
+     ((ucs               . #x20B9B)    ; 𠮛
       )
      ((ucs               . #x20541)    ; 𠕁
       ))
@@ -2067,7 +2071,7 @@
      ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
       (ucs               . #x2FF1)     ; ⿱
       )
-     ((chinese-big5-cdp          . #x8CC2)     ; ������
+     ((ucs               . #x268FB)    ; 𦣻
       )
      ((ucs               . #x4E42)     ; 乂
       ))
@@ -2083,9 +2087,10 @@
      ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW")
       (ucs               . #x2FF1)     ; ⿱
       )
-     ((chinese-big5-cdp          . #x8CC2)     ; ������
+     ((ucs               . #x268FB)    ; 𦣻
       )
-     ((korean-ksc5601    . #x6751)     ; �����
+     ((=jis-x0208        . #x5029)     ; �����
+      (korean-ksc5601    . #x6751)     ; �����
       (ideograph-daikanwa . 00111)     ; �����
       ))
     (ideograph-gt-pj-11 . #x4358)      ; ������
@@ -2266,7 +2271,7 @@
      ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO MIDDLE AND BELOW")
       (ucs               . #x2FF3)     ; ⿳
       )
-     ((chinese-big5-cdp          . #x8B53)     ; ������
+     ((ucs               . #x20B9B)    ; 𠮛
       )
      ((ucs               . #x5196)     ; 冖
       )