X-Git-Url: http://git.chise.org/gitweb/?a=blobdiff_plain;f=lisp%2Futf-2000%2FIdeograph-R016-Table.el;h=b4dff89314a6cc1d18079b776a8fdbff4b17d509;hb=133a3b4eefe6e2bc1a8fa5f860e4f25d9011b10b;hp=24e2f61a43ec56c254239b8d97eaade70d2de96e;hpb=96861d728ddaa3cd901abcd5158c03188bd88d48;p=chise%2Fxemacs-chise.git-

diff --git a/lisp/utf-2000/Ideograph-R016-Table.el b/lisp/utf-2000/Ideograph-R016-Table.el
index 24e2f61..b4dff89 100644
--- a/lisp/utf-2000/Ideograph-R016-Table.el
+++ b/lisp/utf-2000/Ideograph-R016-Table.el
@@ -98,7 +98,11 @@
       ))
     ))
 (define-char
-  '((ideographic-radical . 16)	; ⼏
+  '((<-denotational@component
+     ((=>ucs@iwds-1	  . #x51E1)	; &A-IWDSU+51E1;
+      (=>iwds-1		  .  55346)	; &A-IWDSU+51E1;
+      ))
+    (ideographic-radical . 16)	; ⼏
     (ideographic-strokes . 1)
     (total-strokes	 . 3)
     (=>ucs@component	. #x51E1)	; &A-compU+51E1;
@@ -106,8 +110,8 @@
     ))
 (define-char
   '((<-denotational@component
-     ((=>ucs@component	  . #x5342)	; &A-compU+5342;
-      (=>iwds-1		  .  0055)	; &A-compU+5342;
+     ((=>ucs@iwds-1	  . #x5342)	; &A-IWDSU+5342;
+      (=>iwds-1		  .  0055)	; &A-IWDSU+5342;
       )
      ((=>ucs@component	  . #x51E1)	; &A-compU+51E1;
       (=>iwds-1		  .  0346)	; &A-compU+51E1;