X-Git-Url: http://git.chise.org/gitweb/?a=blobdiff_plain;f=lisp%2Futf-2000%2FIdeograph-R130-Meat.el;h=97525ba5a86bd72e534417ebbd60dd198640ac84;hb=e0c29f6f82ec0922b112641af680f66683dfe668;hp=337db6a16cc4a48d195cb71ef723ac4519b95d69;hpb=e7491c15bfbb1042127b2e04416eaf8cc8f6f39a;p=chise%2Fxemacs-chise.git

diff --git a/lisp/utf-2000/Ideograph-R130-Meat.el b/lisp/utf-2000/Ideograph-R130-Meat.el
index 337db6a..97525ba 100644
--- a/lisp/utf-2000/Ideograph-R130-Meat.el
+++ b/lisp/utf-2000/Ideograph-R130-Meat.el
@@ -23,12 +23,18 @@
     (ideographic-radical . 130)	; ⾁
     (ideographic-strokes . 0)
     (total-strokes	 . 4)
-    (<-ideographic-component-forms
+    (<-formed@component/connect-right
      ((=ucs		  . #x8089)	; 肉
       ))
     (=ucs		. #x2EBC)	; ⺼
     (->subsumptive
-     ((=gt		  . 37857)	; &GT-37857;
+     ((<-formed@component/connect-right
+       ((=ucs		    . #x8089)	; 肉
+	(=daikanwa	    . 29236)	; &I-M-29236;
+	))
+      (<-formed@component/connect-right*sources
+       zihui/char-index zhengzitong daikanwa)
+      (=gt		  . 37857)	; &GT-37857;
       (=gt-pj-6		  . #x3879)	; &GT-37857; [24-89]
       (=daikanwa	  . 29237)	; &I-M-29237;
       )
@@ -36,7 +42,10 @@
       )
      ((=big5-cdp	  . #x8A73)	; &CDP-8A73;
       )
-     ((=big5-cdp	  . #x8958)	; &CDP-8958;
+     ((<-formed@component/connect-above
+       ((=ucs		    . #x8089)	; 肉
+	))
+      (=big5-cdp	  . #x8958)	; &CDP-8958;
       (=gt-k		  . 00417)	; &I-GT-K00417;
       (=gt-pj-k1	  . #x377D)	; &CDP-8958; [23-93]
       ))
@@ -49,7 +58,7 @@
     (ideographic-radical . 130)	; ⾁
     (ideographic-strokes . 0)
     (total-strokes	 . 4)
-    (<-ideographic-component-forms
+    (<-formed@component
      ((=ucs		  . #x8089)	; 肉
       ))
     (=big5-cdp		. #x88F0)	; &CDP-88F0;