Add some `<-simplified@JP/Jouyou' features.

[chise/xemacs-chise.git.1] / lisp / utf-2000 / Ideograph-R058-Snout.el

diff --git a/lisp/utf-2000/Ideograph-R058-Snout.el b/lisp/utf-2000/Ideograph-R058-Snout.el
index 403f72a..8e38305 100644 (file)
--- a/lisp/utf-2000/Ideograph-R058-Snout.el
+++ b/lisp/utf-2000/Ideograph-R058-Snout.el
@@ -118,11 +118,13 @@
   '((ideographic-radical . 58) ; â¼¹
     (ideographic-strokes . 3)
     (total-strokes      . 6)
-    (<-simplified
-     ((=daikanwa         . 21890)      ; ø¸…–‚
+    (<-simplified@JP/Jouyou
+     ((=ucs              . #x7576)     ; 當
+      (=jis-x0208        . #x6144)     ; ø½‹”Ÿ
+      (=daikanwa         . 21890)      ; ø¸…–‚
       ))
-    (<-simplified*sources
-     daikanwa)
+    (<-simplified@JP/Jouyou*sources
+     daikanwa JP/Jouyou)
     (shinjigen-2       . 5071)
     (=ucs              . #x5F53)       ; 当
     (=jis-x0208                . #x4576)       ; ø½Š¬‰