From: MORIOKA Tomohiko <tomo.git@chise.org>
Date: Sun, 7 Jan 2018 06:08:16 +0000 (+0900)
Subject: (IWDS1-0312): Add `<-denotational@component' for A-compU+4E03.
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=35adfccd596ef3e351aaa1ce57ff162b3ea0b3d7;p=chise%2Fxemacs-chise.git-

(IWDS1-0312): Add `<-denotational@component' for A-compU+4E03.
---

diff --git a/lisp/utf-2000/Ideograph-R032-Earth.el b/lisp/utf-2000/Ideograph-R032-Earth.el
index f3bba41..ef2a47e 100644
--- a/lisp/utf-2000/Ideograph-R032-Earth.el
+++ b/lisp/utf-2000/Ideograph-R032-Earth.el
@@ -1,6 +1,9 @@
 ;; -*- coding: utf-8-mcs-er -*-
 (define-char
-  '((ideographic-radical . 32)	; ⼟
+  '((<-denotational@component
+     ((=>ucs@component	  . #x4E03)	; &A-compU+4E03;
+      ))
+    (ideographic-radical . 32)	; ⼟
     (ideographic-strokes . 0)
     (total-strokes	 . 3)
     (=>ucs@component	. #x571F)	; &A-compU+571F;
@@ -2871,8 +2874,8 @@
        ((name		    . "CJK RADICAL SECOND TWO")
 	(=ucs		    . #x2E83)	; ⺃
 	)
-       ((=>ucs@component    . #x4E03)	; &A-compU+4E03;
-	(=>iwds-1	    .  0141)	; &A-compU+4E03;
+       ((=>ucs@iwds-1	    . #x4E03)	; &A-IWDSU+4E03;
+	(=>iwds-1	    .  0141)	; &A-IWDSU+4E03;
 	))
       ))
     (=>mj		. 057209)	; &A-MJ057209;