From 7152344cc8111c36fd0613ade0e96fb1496d17c2 Mon Sep 17 00:00:00 2001 From: MORIOKA Tomohiko Date: Wed, 11 Mar 2020 22:48:54 +0900 Subject: [PATCH] (GT-K01268): Unify U-0003000A; use `ideographic-{radical|strokes}@misc' instead of `ideographic-{radical|strokes}'; add `ideographic-{radical|strokes}@ucs'. --- lisp/utf-2000/Ideograph-R006-Hook.el | 16 ++++++++++++---- 1 file changed, 12 insertions(+), 4 deletions(-) diff --git a/lisp/utf-2000/Ideograph-R006-Hook.el b/lisp/utf-2000/Ideograph-R006-Hook.el index fddc5c3..e860fd6 100644 --- a/lisp/utf-2000/Ideograph-R006-Hook.el +++ b/lisp/utf-2000/Ideograph-R006-Hook.el @@ -605,8 +605,10 @@ )) )) (define-char - '((ideographic-radical . 6) ; ⼅ - (ideographic-strokes . 4) + '((ideographic-radical@ucs . 1) ; ⼀ + (ideographic-strokes@ucs . 4) + (ideographic-radical@misc . 6) ; ⼅ + (ideographic-strokes@misc . 4) (total-strokes . 5) (ideographic-structure ((name . "IDEOGRAPHIC DESCRIPTION CHARACTER ABOVE TO BELOW") @@ -616,8 +618,14 @@ ) ((=big5-cdp . #x88CD) ; &CDP-88CD; )) - (=gt-k . 01268) ; >-K01268; - (=gt-pj-k2 . #x4A76) ; >-K01268; [42-86] + (=ucs . #x3000A) ; 𰀊 + (=gt-k . 01268) ; &I-GT-K01268; + (=gt-pj-k2 . #x4A76) ; 𰀊 [42-86] + (->subsumptive + ((==ucs@JP/hanazono . #x3000A) ; &g2-GT-K01268; + (==gt-k . 01268) ; &g2-GT-K01268; + (==gt-pj-k2 . #x4A76) ; &g2-GT-K01268; [42-86] + )) )) (define-char '((ideographic-radical . 6) ; ⼅ -- 1.7.10.4