(mapping-table-read-file): Use `char-feature' instead of

[chise/xemacs-chise.git.1] / lisp / utf-2000 / Ideograph-R004-Slash.el

diff --git a/lisp/utf-2000/Ideograph-R004-Slash.el b/lisp/utf-2000/Ideograph-R004-Slash.el
index 1a40409..736d455 100644 (file)
--- a/lisp/utf-2000/Ideograph-R004-Slash.el
+++ b/lisp/utf-2000/Ideograph-R004-Slash.el
@@ -443,14 +443,13 @@
     ))
 (define-char
   '((=>ucs             . #x4E4B)       ; 之
-    (ideographic-      (:radical       4 ; ⼃
-                        :strokes       3
-                        :total-strokes 4
-                        :sources       (ucs jis-x0208 morohashi-daikanwa))
-                       (:radical       4 ; ⼃
-                        :strokes       2
-                        :total-strokes 3
-                        :sources       (gt)))
+    (ideographic-radical . 4)  ; ⼃
+    (ideographic-strokes@daikanwa . 3)
+    (total-strokes@daikanwa      . 4)
+    (ideographic-strokes@daikanwa*sources
+     daikanwa jis-x0208)
+    (ideographic-strokes@gt . 2)
+    (total-strokes@gt      . 3)
     (shinjigen-1       . 49)
     (shinjigen-2       . 49)
     (=jis-x0208                . #x4737)       ; ø½Š®†
@@ -1454,6 +1453,10 @@
   '((ideographic-radical . 4)  ; ⼃
     (ideographic-strokes . 8)
     (total-strokes      . 9)
+    (<-simplified@JP/Jouyou
+     ((=ucs              . #x4E58)     ; 乘
+      (=jis-x0208        . #x502B)     ; ø½Š»ˆ
+      ))
     (hanyu-dazidian    1 39 8)
     (shinjigen-1       . 54)
     (shinjigen-2       . 54)