(M070887): New character.

[chise/xemacs-chise.git-] / lisp / utf-2000 / Ideograph-R058-Snout.el

diff --git a/lisp/utf-2000/Ideograph-R058-Snout.el b/lisp/utf-2000/Ideograph-R058-Snout.el
index 1b6058b..f7e0ab6 100644 (file)
--- a/lisp/utf-2000/Ideograph-R058-Snout.el
+++ b/lisp/utf-2000/Ideograph-R058-Snout.el
@@ -35,6 +35,7 @@
     (chinese-cns11643-3                . #x2141)       ; �����
     (japanese-jisx0208-1990    . #x5740)       ; �����
     (ideograph-daikanwa                . 09909)        ; �����
+    (chinese-big5-cdp          . #x8C53)       ; ������
     (ucs                       . #x5F51)       ; 彑
     ))
 (define-char
@@ -43,12 +44,10 @@
     (ideographic-radical . 58) ; ⼹
     (ideographic-strokes . 2)
     (total-strokes      . 5)
-    (->mojikyo         . 050167)       ; 归
-    (vulgar-ideograph-of
-     ((sources           morohashi-daikanwa)
-      (char . ((ideograph-daikanwa . 16349)    ; �����
-              ))
-      ))
+    (<-vulgar-ideograph
+     (:char    ((ideograph-daikanwa . 16349)   ; �����
+                )
+      :sources (morohashi-daikanwa)))
     (chinese-cns11643-3 . #x224A)      ; �����
     ))
 (define-char