(U-00020FC5): Use `->subsumptive'.

[chise/xemacs-chise.git.1] / lisp / utf-2000 / Ideograph-R006-Hook.el

diff --git a/lisp/utf-2000/Ideograph-R006-Hook.el b/lisp/utf-2000/Ideograph-R006-Hook.el
index fd94819..ea2fc45 100644 (file)
--- a/lisp/utf-2000/Ideograph-R006-Hook.el
+++ b/lisp/utf-2000/Ideograph-R006-Hook.el
@@ -355,12 +355,14 @@
     (ideographic-radical . 6)  ; ⼅
     (ideographic-strokes . 6)
     (total-strokes      . 7)
-    (<-vulgar-ideograph
+    (<-vulgar
      ((shinjigen-1       . 69)
+      (=ucs              . #x4E8B)     ; 事
+      (=jis-x0208        . #x3B76)     ; &I-J90-3B76;
       (=daikanwa         . 00241)      ; &I-M-00241;
       ))
-    (<-vulgar-ideograph*sources
-     shinjigen-1)
+    (<-vulgar*sources
+     songyuan-yilai-suzipu daikanwa shinjigen-1)
     (shinjigen-1       . 71)
     (shinjigen-2       . 71)
     (sound@ja/kun      "koto")