Add `===shuowen-jiguge-A30' characters.

[chise/xemacs-chise.git] / lisp / utf-2000 / Ideograph-R020-Wrap.el

diff --git a/lisp/utf-2000/Ideograph-R020-Wrap.el b/lisp/utf-2000/Ideograph-R020-Wrap.el
index 9814178..700d39b 100644 (file)
--- a/lisp/utf-2000/Ideograph-R020-Wrap.el
+++ b/lisp/utf-2000/Ideograph-R020-Wrap.el
@@ -1228,7 +1228,7 @@
     (<-denotational@component
      ((=ucs              . #x2D073)    ; 𭁳
       )
-     ((=>mj              . 058438)     ; &A-MJ058438;
+     ((=ucs              . #x2E39B)    ; 𮎛
       ))
     (ideographic-radical . 20) ; ⼓
     (ideographic-strokes . 3)
@@ -1244,7 +1244,8 @@
       ))
     (=ucs-itaiji-002   . #x5305)       ; &U-i002+5305;
     (->mistakable
-     ((=mj               . 058438)     ; &MJ058438;
+     ((=ucs@JP/hanazono          . #x2E39B)    ; &MJ058438;
+      (=mj               . 058438)     ; &MJ058438;
       ))
     (->subsumptive
      ((===hng-kar        . 00470)      ; &HNG018-00470;
@@ -5871,7 +5872,13 @@
       )
      ((=ucs              . #x718F)     ; 熏
       ))
-    (=ruimoku-v6       . #xE042)       ; &RUI6-E042;
+    (=ucs              . #x31441)      ; 𱑁
+    (=ruimoku-v6       . #xE042)       ; &I-RUI6-E042;
+    (->subsumptive
+     ((==ucs@JP/hanazono  . #x31441)   ; &g2-hanaJU+31441;
+      )
+     ((==ruimoku-v6      . #xE042)     ; &g2-RUI6-E042;
+      ))
     ))
 (define-char
   '((ideographic-radical . 20) ; ⼓