(<CJK RADICAL MEAT>): Use BC-8A73 instead of o-GT-37857 as the mother.

diff --git a/lisp/utf-2000/u02E00-CJK-Radical-Supplement.el b/lisp/utf-2000/u02E00-CJK-Radical-Supplement.el
index 7f4564f..b609480 100644 (file)
--- a/lisp/utf-2000/u02E00-CJK-Radical-Supplement.el
+++ b/lisp/utf-2000/u02E00-CJK-Radical-Supplement.el
@@ -959,7 +959,8 @@
     ))
 (define-char
   '((<-denotational
-     ((=+>gt             . 37857)      ; &o-GT-37857;
+     ((=big5-cdp         . #x8A73)     ; &GT-37857;
+      (=daikanwa         . 29237)      ; &I-M-29237;
       ))
     (name              . "CJK RADICAL MEAT")
     (general-category  symbol other) ; Informative Category
@@ -973,7 +974,7 @@
      ((=ucs              . #x8089)     ; 肉
       ))
     (<-identical@component/connect-right
-     ((=gt               . 37857)      ; &GT-37857;
+     ((=big5-cdp         . #x8A73)     ; &GT-37857;
       (=daikanwa         . 29237)      ; &I-M-29237;
       ))
     ))