From 2025930e68b2f29c1f9a4d18a4d7959c8dc62dc4 Mon Sep 17 00:00:00 2001 From: MORIOKA Tomohiko Date: Mon, 10 Oct 2016 17:49:55 +0900 Subject: [PATCH] (BC-8970): Use `<-subsumptive' for U+7F8A instead of `=>ucs' for U+2EB6; moved to Ideograph-R123-Sheep.el. (UU+2EB6): New character; use `<-denotational' for ; use `<-formed@component' for U+7F8A. (BC-8CCC): Use `<-denotational' instead of `=>ucs' to represent mapping for . --- lisp/utf-2000/u02E00-CJK-Radical-Supplement.el | 18 +++++++++++++++--- 1 file changed, 15 insertions(+), 3 deletions(-) diff --git a/lisp/utf-2000/u02E00-CJK-Radical-Supplement.el b/lisp/utf-2000/u02E00-CJK-Radical-Supplement.el index 3c19af2..144d1a7 100644 --- a/lisp/utf-2000/u02E00-CJK-Radical-Supplement.el +++ b/lisp/utf-2000/u02E00-CJK-Radical-Supplement.el @@ -828,17 +828,26 @@ )) )) (define-char - '((=>ucs . #x2EB6) ; ⺶ + '((<-denotational + ((name . "CJK RADICAL SHEEP") + (=ucs . #x2EB6) ; ⺶ + )) (ideographic-radical . 123) ; ⽺ (ideographic-strokes . 0) (total-strokes . 6) - (=big5-cdp . #x8970) ; &CDP-8970; + (=ucs@unicode . #x2EB6) ; &UU+2EB6; (<-formed@component ((=ucs . #x7F8A) ; 羊 )) + (->subsumptive + ((==ucs@unicode . #x2EB6) ; &g2-UU+2EB6; + )) )) (define-char - '((=>ucs . #x2EB6) ; ⺶ + '((<-denotational + ((name . "CJK RADICAL SHEEP") + (=ucs . #x2EB6) ; ⺶ + )) (ideographic-radical . 123) ; ⽺ (ideographic-strokes . 0) (total-strokes . 7) @@ -846,6 +855,9 @@ (<-formed@component ((=ucs . #x7F8A) ; 羊 )) + (->subsumptive + ((==big5-cdp . #x8CCC) ; &g2-CDP-8CCC; + )) )) (define-char '((name . "CJK RADICAL RAM") -- 1.7.10.4