X-Git-Url: http://git.chise.org/gitweb/?a=blobdiff_plain;f=lisp%2Futf-2000%2FIdeograph-R020-Wrap.el;h=2a375ea712e338e1685473650362743a966e8efe;hb=ac5de09f866875b711af2f7e0fbd5c17743ebcdc;hp=52518d2775cbba4cd01691ab9b658531dc1b96e0;hpb=4c76a7ed0585e0ae9656ac02c380aa7bcebc4b35;p=chise%2Fxemacs-chise.git

diff --git a/lisp/utf-2000/Ideograph-R020-Wrap.el b/lisp/utf-2000/Ideograph-R020-Wrap.el
index 52518d2..2a375ea 100644
--- a/lisp/utf-2000/Ideograph-R020-Wrap.el
+++ b/lisp/utf-2000/Ideograph-R020-Wrap.el
@@ -1672,12 +1672,16 @@
       )
      ((=ucs		  . #x52F9)	; 勹
       )
-     ((=ucs@unicode	  . #x8345)	; &GT-40184;
-      (=jis-x0208	  . #x6829)	; &GT-40184; [72-09]
-      (=iso-ir165	  . #x7E3E)	; &I-EGB-7E3E; [94-30]
-      (=jis-x0213-1	  . #x6829)	; &I-JX1-6829; [72-09]
+     ((=ucs@unicode	  . #x8345)	; &AJ1-06354;
+      (=adobe-japan1-0	  . 06354)	; &AJ1-06354;
       ))
     (=ucs@unicode	. #x5312)	; &UU+5312;
+    (->subsumptive
+     ((==ucs@unicode	  . #x5312)	; &g2-UU+5312;
+      (->subsumptive
+       ((===ucs@unicode	    . #x5312)	; &R-UU+5312;
+	))
+      ))
     ))
 (define-char
   '((ideographic-radical . 20)	; ⼓