Add missing mappings between JIS X 0213 and UCS.

[chise/xemacs-chise.git-] / lisp / utf-2000 / Ideograph-R031-Enclosure.el

diff --git a/lisp/utf-2000/Ideograph-R031-Enclosure.el b/lisp/utf-2000/Ideograph-R031-Enclosure.el
index f8b6338..d048c96 100644 (file)
--- a/lisp/utf-2000/Ideograph-R031-Enclosure.el
+++ b/lisp/utf-2000/Ideograph-R031-Enclosure.el
@@ -209,15 +209,19 @@
     (ideograph-daikanwa . 04684)       ; �����
     ))
 (define-char
-  '((=>ucs             . #x20064)      ; 𠁤
-    (morohashi-daikanwa        4684 0 0)
-    (ideographic-radical . 31) ; ⼞
-    (ideographic-strokes . 2)
+  '((morohashi-daikanwa        4684 0 0)
+    (ideographic-      (:radical       31 ; ⼞
+                        :strokes       2)
+                       (:radical       2 ; ⼁
+                        :strokes       4))
     (total-strokes      . 5)
-    (->identical
-     ((ucs               . #x20064)    ; 𠁤
+    (->same-ideograph
+     ((ideograph-daikanwa . 04684)     ; �����
       ))
+    (hanyu-dazidian    1 29 3)
     (chinese-cns11643-6 . #x225F)      ; �����
+    (chinese-big5-cdp  . #x87E5)       ; ������
+    (ucs               . #x20064)      ; 𠁤
     ))
 (define-char
   '((ideographic-radical . 31) ; ⼞