(M-01615): Use `<-wrong-ideograph' instead of

[chise/xemacs-chise.git-] / lisp / utf-2000 / Ideograph-R003-Dot.el

diff --git a/lisp/utf-2000/Ideograph-R003-Dot.el b/lisp/utf-2000/Ideograph-R003-Dot.el
index 7e14156..8671617 100644 (file)
--- a/lisp/utf-2000/Ideograph-R003-Dot.el
+++ b/lisp/utf-2000/Ideograph-R003-Dot.el
@@ -80,17 +80,22 @@
     (mojikyo           . 000095)       ; ������
     ))
 (define-char
-  '((=>ucs             . #x4E38)       ; 丸
-    (ideographic-radical . 3)  ; ⼂
+  '((ideographic-radical . 3)  ; ⼂
     (ideographic-strokes . 2)
     (total-strokes      . 3)
-    (original-char-of-shinjigen-1 . 39)
+    (<-original-ideograph
+     (:sources (chuuka-daijiten morohashi-daikanwa shinjigen-1)
+      :char    ((shinjigen-1        . 39)
+                (ideograph-daikanwa . 00094)   ; �����
+                )
+      ))
     (shinjigen-1       . 40)
     (chinese-cns11643-6 . #x2132)      ; �����
     (ideograph-gt-pj-2 . #x306B)       ; ������
     (ideograph-daikanwa . 00096)       ; �����
     (ideograph-gt      . 00133)        ; ������
     (mojikyo           . 000096)       ; ������
+    (ucs               . #x2007D)      ; 𠁽
     ))
 (define-char
   '((script            Ideograph)
@@ -184,8 +189,7 @@
                 (ucs                . #x2FF1)  ; ⿱
                 )
       )
-     ((chinese-big5-cdp          . #x8B41)     ; 丶
-      (ucs               . #x4E36)     ; 丶
+     ((ucs               . #x4E36)     ; 丶
       )
      ((ucs               . #x738B)     ; 王
       ))
@@ -215,8 +219,7 @@
       )
      ((ucs               . #x4E95)     ; 井
       )
-     ((chinese-big5-cdp          . #x8B41)     ; 丶
-      (ucs               . #x4E36)     ; 丶
+     ((ucs               . #x4E36)     ; 丶
       ))
     (shinjigen-1       . 44)
     (shinjigen-2       . 44)
@@ -240,6 +243,7 @@
     (ideograph-daikanwa . 00102)       ; �����
     (ideograph-gt      . 00140)        ; ������
     (mojikyo           . 000102)       ; ������
+    (ucs               . #x2007F)      ; 𠁿
     ))
 (define-char
   '((ideographic-radical . 3)  ; ⼂
@@ -257,6 +261,7 @@
     (ideograph-daikanwa . 00103)       ; �����
     (ideograph-gt      . 00143)        ; ������
     (mojikyo           . 000103)       ; ������
+    (ucs               . #x20082)      ; 𠂂
     ))
 (define-char
   '((ideographic-radical . 3)  ; ⼂
@@ -320,4 +325,5 @@
     (ideograph-daikanwa . 00105)       ; �����
     (ideograph-gt      . 00147)        ; ������
     (mojikyo           . 000105)       ; ������
+    (ucs               . #x20084)      ; 𠂄
     ))