From: tomo Date: Fri, 12 Mar 2004 16:45:33 +0000 (+0000) Subject: (M-07112): Use `->subsumptive'; use `->same*sources' instead of using X-Git-Tag: r21-4-14-chise-0_21-25-si-same^2~102 X-Git-Url: http://git.chise.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=32dd95a9873083486d1346a79572cdb414b777c8;p=chise%2Fxemacs-chise.git.1 (M-07112): Use `->subsumptive'; use `->same*sources' instead of using char-ref in `->same'. --- diff --git a/lisp/utf-2000/Ideograph-R040-Roof.el b/lisp/utf-2000/Ideograph-R040-Roof.el index 5132a53..ab78412 100644 --- a/lisp/utf-2000/Ideograph-R040-Roof.el +++ b/lisp/utf-2000/Ideograph-R040-Roof.el @@ -1123,16 +1123,23 @@ )) (define-char '((=>ucs . #x5B90) ; 宐 + (=>daikanwa . 07112) ; ø¸¯ˆ (ideographic-radical . 40) ; ⼧ (ideographic-strokes . 5) (total-strokes . 8) (->same - (:sources (morohashi-daikanwa) - :char ((=daikanwa . 07111) ; ø¸¯‡ - ) + ((=jis-x0208 . #x3539) ; ø½Š“¬ + (=ks-x1001 . #x6B71) ; ø»Šˆˆ + (=daikanwa . 07111) ; ø¸¯‡ + )) + (->same*sources + daikanwa) + (->subsumptive + ((=daikanwa . 07112) ; ø¸¯ˆ + ) + ((=cns11643-4 . #x2625) ; ø»—¨‚ + (=ucs@cns . #x5B90) ; ø»—¨‚ )) - (=cns11643-4 . #x2625) ; ø»—¨‚ - (=daikanwa . 07112) ; ø¸¯ˆ )) (define-char '((ideographic-radical . 40) ; ⼧ @@ -3474,7 +3481,7 @@ ((sources bos=A015412-00003) (=ruimoku-v6 . #xE009) ; øº€‰ ) - ((=ucs@iso . #x21A5C) ; 󰀕 + ((=ucs@iso . #x21A5C) ; 󰀘 )) )) (define-char