From 31b8e156c51ef5962cee6e715e34af022f63d43f Mon Sep 17 00:00:00 2001 From: tomo Date: Mon, 20 Jun 2005 15:04:24 +0000 Subject: [PATCH] (GT-K00182): Unify BC-8960. (U+9FB0): Use `->subsumptive' to integrate BC-8B68. --- lisp/utf-2000/Ideograph-R077-Stop.el | 18 ++++++++++++------ 1 file changed, 12 insertions(+), 6 deletions(-) diff --git a/lisp/utf-2000/Ideograph-R077-Stop.el b/lisp/utf-2000/Ideograph-R077-Stop.el index db5bbb8..cfcf4aa 100644 --- a/lisp/utf-2000/Ideograph-R077-Stop.el +++ b/lisp/utf-2000/Ideograph-R077-Stop.el @@ -25,8 +25,8 @@ (<-ideographic-component-forms ((=ucs . #x6B62) ; 止 )) - (=gt-k . 00182) ; >-K00182; - (=gt-pj-k1 . #x3A42) ; >-K00182; [26-34] + (=gt-k . 00439) ; >-K00439; + (=gt-pj-k1 . #x347D) ; >-K00439; [20-93] )) (define-char '((=>ucs . #x6B62) ; 止 @@ -37,8 +37,9 @@ (<-ideographic-component-forms ((=ucs . #x6B62) ; 止 )) - (=gt-k . 00439) ; >-K00439; - (=gt-pj-k1 . #x347D) ; >-K00439; [20-93] + (=big5-cdp . #x8960) ; &CDP-8960; + (=gt-k . 00182) ; &I-GT-K00182; + (=gt-pj-k1 . #x3A42) ; &CDP-8960; [26-34] )) (define-char '((=>daikanwa . 16253) ; 止 @@ -49,8 +50,13 @@ ((=ucs . #x6B62) ; 止 )) (=ucs . #x9FB0) ; 龰 - (=gt-k . 00440) ; &I-GT-K00440; - (=gt-pj-k1 . #x3675) ; 龰 [22-85] + (->subsumptive + ((=big5-cdp . #x8B68) ; &CDP-8B68; + ) + ((=gt-k . 00440) ; >-K00440; + (=gt-pj-k1 . #x3675) ; >-K00440; [22-85] + (=ucs@unicode . #x9FB0) ; >-K00440; + )) )) (define-char '((=>ucs . #x23942) ; 𣥂 -- 1.7.10.4