X-Git-Url: http://git.chise.org/gitweb/?a=blobdiff_plain;f=lisp%2Futf-2000%2FIdeograph-R019-Power.el;h=f26de57111f131a924fcd0156db7153fccbffaeb;hb=52838d5d5614c339626bec4abba4699995150678;hp=4280834894c4aeee293e66641dbc7145b03f18b2;hpb=41dc58bac1e0ddb0125eda99409a70c693abf74f;p=chise%2Fxemacs-chise.git

diff --git a/lisp/utf-2000/Ideograph-R019-Power.el b/lisp/utf-2000/Ideograph-R019-Power.el
index 4280834..f26de57 100644
--- a/lisp/utf-2000/Ideograph-R019-Power.el
+++ b/lisp/utf-2000/Ideograph-R019-Power.el
@@ -878,18 +878,24 @@
     (ucs		. #x52C7)	; 勇
     ))
 (define-char
-  '((->ucs		. #x52C7)	; 勇
+  '((script		JP-Jouyou Ideograph)
+    (->ucs		. #x52C7)	; 勇
     (morohashi-daikanwa	2360 1)
     (ideographic-radical . 19)	; ⼒
     (ideographic-strokes . 7)
     (total-strokes	 . 9)
-    (comment		. "[JP-Jouyou] <vulgar character> of S1-0731")
     (shinjigen-1	. 730)
     (shinjigen-2	. 730)
+    (vulgar-ideograph-of
+     ((sources		  shinjigen-1)
+      (char . ((shinjigen-1	   . 731)
+	       (ideograph-daikanwa . 02360)	; ø¸€¤¸
+	       ))
+      ))
     (japanese-jisx0208-1978	. #x4D26)	; ø»‚¼­
     (japanese-jisx0208		. #x4D26)	; ø»‡µ
     (chinese-cns11643-6		. #x2F25)	; ø»œ‰˜
-    (mojikyo			. 050110)	; ø¸ŒŽ¾
+    (mojikyo			. 050110)	; ý €ŒŽ¾
     ))
 (define-char
   '((ideographic-radical . 19)	; ⼒
@@ -1165,18 +1171,18 @@
     (ideograph-daikanwa . 02384)	; ø¸€¥
     ))
 (define-char
-  '((->ucs		. #x52C9)	; 勉
+  '((script		JP-Jouyou Ideograph)
+    (->ucs		. #x52C9)	; 勉
     (morohashi-daikanwa	2384 1)
     (ideographic-radical . 19)	; ⼒
     (ideographic-strokes . 8)
     (total-strokes	 . 10)
-    (comment		. "[JP-Jouyou]")
     (shinjigen-1	. 735)
     (shinjigen-2	. 735)
     (japanese-jisx0208-1978	. #x4A59)	; ø»‚¹†
     (japanese-jisx0208		. #x4A59)	; ø»‡Ž
     (chinese-cns11643-6		. #x3558)	; ø»œ’¿
-    (mojikyo			. 050111)	; ø¸ŒŽ¿
+    (mojikyo			. 050111)	; ý €ŒŽ¿
     ))
 (define-char
   '((ideographic-radical . 19)	; ⼒
@@ -1553,19 +1559,25 @@
     (ideograph-daikanwa . 02415)	; ø¸€¥¯
     ))
 (define-char
-  '((->ucs		. #x52E4)	; 勤
+  '((script		JP-Jouyou Ideograph)
+    (->ucs		. #x52E4)	; 勤
     (morohashi-daikanwa	2415 1)
     (ideographic-radical . 19)	; ⼒
     (ideographic-strokes . 10)
     (total-strokes	 . 12)
-    (comment		. "[JP-Jouyou] <vulgar character> of S1-0744")
     (shinjigen-1	. 743)
     (shinjigen-2	. 743)
+    (vulgar-ideograph-of
+     ((sources		  shinjigen-1)
+      (char . ((shinjigen-1	   . 744)
+	       (ideograph-daikanwa . 02424)	; ø¸€¥¸
+	       ))
+      ))
     (japanese-jisx0208-1978	. #x3650)	; ø»‚›¥
     (japanese-jisx0208		. #x3650)	; ø»†¯­
     (chinese-cns11643-4		. #x364C)	; ø»˜€‰
     (japanese-jisx0208-1990	. #x3650)	; ø½Š•¡
-    (mojikyo			. 050112)	; ø¸Œ€
+    (mojikyo			. 050112)	; ý €Œ€
     ))
 (define-char
   '((->ucs		. #x52DF)	; 募