From: tomo Date: Thu, 31 May 2001 12:02:34 +0000 (+0000) Subject: (M-07089): Use `original-ideograph-of' property instead of X-Git-Tag: r21-2-38-utf-2000-0_17-1~690 X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=3d06aa2b9c36f017fb3243196c7afaa7994701eb;p=chise%2Fxemacs-chise.git.1 (M-07089): Use `original-ideograph-of' property instead of `ideograph-original-char-of' property to describe source. (M-07112): Modify format of `ideograph=' to describe source. --- diff --git a/lisp/utf-2000/Ideograph-R040-Roof.el b/lisp/utf-2000/Ideograph-R040-Roof.el index 15a6893..ff80b1b 100644 --- a/lisp/utf-2000/Ideograph-R040-Roof.el +++ b/lisp/utf-2000/Ideograph-R040-Roof.el @@ -436,12 +436,15 @@ '((ideographic-radical . 40) ; ⼧ (ideographic-strokes . 4) (total-strokes . 7) - (ideograph-original-char-of ((->ucs . #x5B9C) ; 宜 - (ideographic-radical . 40) ; ⼧ - (ideographic-strokes . 5) - (total-strokes . 8) - (ideograph-daikanwa . 07111) ; ø¸¯‡ - )) + (original-ideograph-of + ((sources morohashi-daikanwa) + (char . ((->ucs . #x5B9C) ; 宜 + (ideographic-radical . 40) ; ⼧ + (ideographic-strokes . 5) + (total-strokes . 8) + (ideograph-daikanwa . 07111) ; ø¸¯‡ + )) + )) (japanese-jisx0212 . #x3A4C) ; ø»‹‰© (ideograph-daikanwa . 07089) ; ø¸®± (ucs . #x5B90) ; 宐 @@ -724,12 +727,15 @@ (ideographic-radical . 40) ; ⼧ (ideographic-strokes . 5) (total-strokes . 8) - (ideograph= ((->ucs . #x5B9C) ; 宜 - (ideographic-radical . 40) ; ⼧ - (ideographic-strokes . 5) - (total-strokes . 8) - (ideograph-daikanwa . 07111) ; ø¸¯‡ - )) + (ideograph= + ((sources morohashi-daikanwa) + (char . ((->ucs . #x5B9C) ; 宜 + (ideographic-radical . 40) ; ⼧ + (ideographic-strokes . 5) + (total-strokes . 8) + (ideograph-daikanwa . 07111) ; ø¸¯‡ + )) + )) (chinese-cns11643-4 . #x2625) ; ø»—¨‚ (ideograph-daikanwa . 07112) ; ø¸¯ˆ ))