From f1f8b564e2432059995227103e2b18b285f8c2aa Mon Sep 17 00:00:00 2001 From: tomo Date: Tue, 20 Apr 2004 10:16:35 +0000 Subject: [PATCH] (U-0002F817): Use `=>daikanwa' instead of `morohashi-daikanwa'; add `=>ucs*' for U+5197; use `<-vulgar*sources' instead of char-ref in `<-vulgar'. (U+51A8): Use `<-vulgar*sources' instead of char-ref in `<-vulgar'. --- lisp/utf-2000/Ideograph-R014-Cover.el | 21 ++++++++++++--------- 1 file changed, 12 insertions(+), 9 deletions(-) diff --git a/lisp/utf-2000/Ideograph-R014-Cover.el b/lisp/utf-2000/Ideograph-R014-Cover.el index ab3b9e7..f85053c 100644 --- a/lisp/utf-2000/Ideograph-R014-Cover.el +++ b/lisp/utf-2000/Ideograph-R014-Cover.el @@ -41,15 +41,18 @@ (=daikanwa . 01566) ; &I-M-01566; )) (define-char - '((morohashi-daikanwa 1566 0 5) + '((=>ucs* . #x5197) ; 冗 + (=>daikanwa . 01566) ; 冗 (ideographic-radical . 14) ; ⼍ (ideographic-strokes . 2) (total-strokes . 4) (<-vulgar - (:char ((shinjigen-1 . 525) - (=daikanwa . 01566) ; &I-M-01566; - ) - :sources (shinjigen-1))) + ((shinjigen-1 . 525) + (=ucs . #x5197) ; 冗 + (=jis-x0208 . #x3E69) ; &I-J90-3E69; + )) + (<-vulgar*sources + shinjigen-1) (ideographic-structure ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW") (=ucs . #x2FF1) ; ⿱ @@ -673,11 +676,11 @@ (ideographic-strokes . 9) (total-strokes . 11) (<-vulgar - (:sources (shinjigen-1) - :char ((shinjigen-1 . 1852) - (=daikanwa . 07230) ; &I-M-07230; - ) + ((shinjigen-1 . 1852) + (=daikanwa . 07230) ; &I-M-07230; )) + (<-vulgar*sources + shinjigen-1) (hanyu-dazidian 1 305 3) (ideographic-structure ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW") -- 1.7.10.4