(J0-6348): Separate C1-6562 and U+7A1F; add `ucs-jis' for U+7A1F.

diff --git a/lisp/utf-2000/Ideograph-R115-Grain.el b/lisp/utf-2000/Ideograph-R115-Grain.el
index 6521e0b..d72c002 100644 (file)
--- a/lisp/utf-2000/Ideograph-R115-Grain.el
+++ b/lisp/utf-2000/Ideograph-R115-Grain.el
@@ -1964,17 +1964,31 @@
     (ucs                       . #x7A1E)       ; 稞
     ))
 (define-char
-  '((ideographic-radical . 115)        ; ⽲
+  '((=>ucs             . #x7A1F)       ; 稟
+    (ideographic-radical . 115)        ; ⽲
     (ideographic-strokes . 8)
     (total-strokes      . 13)
     (shinjigen-2       . 5640)
     (=jis-x0208                . #x6348)       ; �����
     (korean-ksc5601    . #x7922)       ; �����
-    (chinese-cns11643-1 . #x6562)      ; �����
     (ideograph-daikanwa . 25127)       ; �����
+    ))
+(define-char
+  '((morohashi-daikanwa        25127 0 0)
+    (ideographic-radical . 115)        ; ⽲
+    (ideographic-strokes . 8)
+    (total-strokes      . 13)
     (ucs               . #x7A1F)       ; 稟
     ))
 (define-char
+  '((=>ucs             . #x7A1F)       ; 稟
+    (morohashi-daikanwa        25127 0 1)
+    (ideographic-radical . 115)        ; ⽲
+    (ideographic-strokes . 8)
+    (total-strokes      . 13)
+    (chinese-cns11643-1 . #x6562)      ; �����
+    ))
+(define-char
   '((ideographic-radical . 115)        ; ⽲
     (ideographic-strokes . 8)
     (total-strokes      . 13)