From: tomo <tomo>
Date: Thu, 31 May 2001 12:11:38 +0000 (+0000)
Subject: (M-13453): Add `total-strokes' property and `vulgar-ideograph-of'
X-Git-Tag: r21-2-38-utf-2000-0_17-1~687
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=e4ed58ffbbe72c9e5c844316f2c864c466b49a26;p=chise%2Fxemacs-chise.git.1

(M-13453): Add `total-strokes' property and `vulgar-ideograph-of'
property.
---

diff --git a/lisp/utf-2000/Ideograph-R067-Script.el b/lisp/utf-2000/Ideograph-R067-Script.el
index 8194b23..c3f0323 100644
--- a/lisp/utf-2000/Ideograph-R067-Script.el
+++ b/lisp/utf-2000/Ideograph-R067-Script.el
@@ -55,7 +55,17 @@
 (define-char
   '((ideographic-radical . 67)	; ⽂
     (ideographic-strokes . 3)
+    (total-strokes	 . 7)
     (shinjigen-2	. 1786)
+    (vulgar-ideograph-of
+     ((sources		  morohashi-daikanwa)
+      (char . ((ideographic-radical . 39)	; ⼦
+	       (ideographic-strokes . 13)
+	       (total-strokes	    . 16)
+	       (shinjigen-2	   . 1783)
+	       (ideograph-daikanwa . 07033)	; ø¸­¹
+	       ))
+      ))
     (japanese-jisx0208-1990	. #x555D)	; ø½‹ƒ
     (ideograph-daikanwa		. 13453)	; ø¸ƒ’
     (ucs			. #x6588)	; 斈