(C6-333D): Use `=>ucs*' instead of `ideograph='; use
authortomo <tomo>
Tue, 19 Feb 2002 02:52:55 +0000 (02:52 +0000)
committertomo <tomo>
Tue, 19 Feb 2002 02:52:55 +0000 (02:52 +0000)
`<-original-ideograph' instead of `original-ideograph-of'.

lisp/utf-2000/Ideograph-R109-Eye.el

index fdfd72a..2ae8474 100644 (file)
     (ideograph-daikanwa . 23209)       ; 
     ))
 (define-char
-  '((ideographic-radical . 109)        ; ⽬
+  '((=>ucs*            . #x250F2)      ; 𥃲
+    (ideographic-radical . 109)        ; ⽬
     (ideographic-strokes . 4)
     (total-strokes      . 9)
-    (ideograph=
-     ((sources           ucs)
-      (char . ((ucs               . #x250F2)   ; 𥃲
-              ))
-      ))
-    (original-ideograph-of
-     ((sources           morohashi-daikanwa)
-      (char . ((ideograph-daikanwa . 01473)    ; 
-              ))
+    (<-original-ideograph
+     (:sources (morohashi-daikanwa)
+      :char    ((ideograph-daikanwa . 01473)   ; 
+                )
       ))
     (chinese-cns11643-6 . #x333D)      ; 
     (ideograph-daikanwa . 23210)       ;