(M-01718): Use `<-vulgar-ideograph*sources' instead of char-ref in

[chise/xemacs-chise.git.1] / lisp / utf-2000 / Ideograph-R104-Sickness.el

diff --git a/lisp/utf-2000/Ideograph-R104-Sickness.el b/lisp/utf-2000/Ideograph-R104-Sickness.el
index b5e33e5..0e47836 100644 (file)
--- a/lisp/utf-2000/Ideograph-R104-Sickness.el
+++ b/lisp/utf-2000/Ideograph-R104-Sickness.el
@@ -3147,6 +3147,11 @@
     (ideographic-radical . 104)        ; ⽧
     (ideographic-strokes . 8)
     (total-strokes      . 13)
+    (<-simplified@JP/Jouyou
+     ((=jis-x0208        . #x6177)     ; ø½‹•’
+      (=ks-x1001         . #x7642)     ; ø»Š—£
+      (=daikanwa         . 22591)      ; ø¸… ¿
+      ))
     (shinjigen-2       . 5134)
     (=jis-x0208                . #x4354)       ; ø½Š¨«
     (=ks-x1001         . #x7641)       ; ø»Š—¢
@@ -4419,12 +4424,12 @@
     (=ucs@jis          . #x7613)       ; ø»‹¦„
     ))
 (define-char
-  '((=>ucs             . #x7613)       ; 瘓
-    (morohashi-daikanwa        22351 0 2)
+  '((morohashi-daikanwa        22351 0 2)
     (ideographic-radical . 104)        ; ⽧
     (ideographic-strokes . 9)
     (total-strokes      . 14)
-    (=gb12345          . #x3B3E)       ; 􇘓
+    (=ucs              . #x7613)       ; 瘓
+    (=gb12345          . #x3B3E)       ; 瘓
     ))
 (define-char
   '((=>ucs             . #x7613)       ; 瘓