From: tomo <tomo>
Date: Fri, 16 Jan 2004 07:23:26 +0000 (+0000)
Subject: (M-01512): Use `<-vulgar-ideograph' and `<-vulgar-ideograph*sources'
X-Git-Tag: r21-4-14-chise-0_21-19^2~107
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=ae64574e98e33e87a523f8957400bff4501468d7;p=chise%2Fxemacs-chise.git

(M-01512): Use `<-vulgar-ideograph' and `<-vulgar-ideograph*sources'
instead of `comment'; separate S-0481, U+5185, J0-4662, G0-445A,
GT-01983 and GT-K00547.
(U+5185): Unify BC-8C57.
(U+5186): Add `<-simplified@JP/Jouyou'.
---

diff --git a/lisp/utf-2000/Ideograph-R013-Down-Box.el b/lisp/utf-2000/Ideograph-R013-Down-Box.el
index 1ab1d2f..6802184 100644
--- a/lisp/utf-2000/Ideograph-R013-Down-Box.el
+++ b/lisp/utf-2000/Ideograph-R013-Down-Box.el
@@ -107,37 +107,41 @@
     (=daikanwa		. 01511)	; ø¸€—§
     ))
 (define-char
-  '((ideographic-radical . 13)	; ⼌
+  '((=>ucs		. #x5185)	; 内
+    (ideographic-radical . 13)	; ⼌
     (ideographic-strokes . 2)
     (total-strokes	 . 4)
-    (comment		. "<vulgar character> of R011:M01418.0")
-    (shinjigen-1	. 481)
-    (shinjigen-2	. 481)
-    (=ucs		. #x5185)	; 内
-    (=jis-x0208		. #x4662)	; ø½Š­“
-    (=gb2312		. #x445A)	; ø»„º—
+    (<-vulgar-ideograph
+     ((=daikanwa	  . 01418)	; ø¸€–Š
+      ))
+    (<-vulgar-ideograph*sources
+     daikanwa)
     (=cns11643-6	. #x2150)	; ø»›µŸ
-    (=gt		. 01983)	; ý¡€€ž¿
-    (=gt-k		. 00547)	; ý¡„€ˆ£
-    (=gt-pj-1		. #x4662)	; ý¡€€ž¿
     (=daikanwa		. 01512)	; ø¸€—¨
     ))
 (define-char
-  '((=>ucs		. #x5185)	; 内
-    (morohashi-daikanwa	1512 0 0)
+  '((morohashi-daikanwa	1512 0 0)
     (ideographic-radical . 13)	; ⼌
     (ideographic-strokes . 2)
     (total-strokes	 . 4)
-    (<-radical
-     ((=ucs		  . #x5185)	; 内
-      ))
-    (ideograph-cdp	. -434)
+    (shinjigen-1	. 481)
+    (shinjigen-2	. 481)
+    (=ucs		. #x5185)	; 内
+    (=jis-x0208		. #x4662)	; ø½Š­“
+    (=gb2312		. #x445A)	; ø»„º—
     (=big5-cdp		. #x8C57)	; ý¢€ˆ±—
+    (=gt		. 01983)	; ý¡€€ž¿
+    (=gt-k		. 00547)	; ý¡„€ˆ£
+    (=gt-pj-1		. #x4662)	; ý¡€€ž¿
     ))
 (define-char
   '((ideographic-radical . 13)	; ⼌
     (ideographic-strokes . 2)
     (total-strokes	 . 4)
+    (<-simplified@JP/Jouyou
+     ((=ucs		  . #x5713)	; 圓
+      (=jis-x0208	  . #x5424)	; ø½‹€¹
+      ))
     (hanyu-dazidian	1 96 18)
     (shinjigen-1	. 1331)
     (shinjigen-2	. 1331)