From: tomo <tomo>
Date: Sat, 6 Aug 2005 15:53:46 +0000 (+0000)
Subject: - Use `<-vertical' instead of `->decomposition' for compatibility
X-Git-Tag: r21-4-17-chise-0_22-4^20~306
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=df8cd654cf72e0f8797d1a1729c6df25a9ea3a57;p=chise%2Fxemacs-chise.git.1

- Use `<-vertical' instead of `->decomposition' for compatibility
  mapping to single character tagged `vertical'.
- Use `<-compat' instead of `->decomposition' for compatibility
  mapping to single character.
---

diff --git a/lisp/utf-2000/u0FE30-CJK-Compatibility-Forms.el b/lisp/utf-2000/u0FE30-CJK-Compatibility-Forms.el
index f61067e..ffeb3e2 100644
--- a/lisp/utf-2000/u0FE30-CJK-Compatibility-Forms.el
+++ b/lisp/utf-2000/u0FE30-CJK-Compatibility-Forms.el
@@ -4,7 +4,10 @@
     (general-category	punctuation other) ; Informative Category
     (bidi-category	. "ON")
     (mirrored		. nil)
-    (->decomposition	vertical #x2025)
+    (<-vertical
+     ((name		  . "TWO DOT LEADER")
+      (=ucs		  . #x2025)	; ‥
+      ))
     (=ucs		. #xFE30)	; ︰
     (=cns11643-1	. #x212B)	; &I-C1-212B; [01-11]
     (=big5		. #xA14A)	; &I-B-A14A;
@@ -14,7 +17,10 @@
     (general-category	punctuation dash) ; Informative Category
     (bidi-category	. "ON")
     (mirrored		. nil)
-    (->decomposition	vertical #x2014)
+    (<-vertical
+     ((name		  . "EM DASH")
+      (=ucs		  . #x2014)	; —
+      ))
     (=ucs		. #xFE31)	; ︱
     (=cns11643-1	. #x2136)	; &I-C1-2136; [01-22]
     (=big5		. #xA157)	; &I-B-A157;
@@ -24,7 +30,10 @@
     (general-category	punctuation dash) ; Informative Category
     (bidi-category	. "ON")
     (mirrored		. nil)
-    (->decomposition	vertical #x2013)
+    (<-vertical
+     ((name		  . "EN DASH")
+      (=ucs		  . #x2013)	; –
+      ))
     (=ucs		. #xFE32)	; ︲
     (=cns11643-1	. #x2138)	; &I-C1-2138; [01-24]
     ))
@@ -33,7 +42,10 @@
     (general-category	punctuation connector) ; Informative Category
     (bidi-category	. "ON")
     (mirrored		. nil)
-    (->decomposition	vertical #x005F)
+    (<-vertical
+     ((name		  . "LOW LINE")
+      (=ucs		  . #x005F)	; _
+      ))
     (=ucs		. #xFE33)	; ︳
     (=cns11643-1	. #x213A)	; &I-C1-213A; [01-26]
     (=big5		. #xA159)	; &I-B-A159;
@@ -43,7 +55,10 @@
     (general-category	punctuation connector) ; Informative Category
     (bidi-category	. "ON")
     (mirrored		. nil)
-    (->decomposition	vertical #x005F)
+    (<-vertical
+     ((name		  . "LOW LINE")
+      (=ucs		  . #x005F)	; _
+      ))
     (=ucs		. #xFE34)	; ︴
     (=cns11643-1	. #x213C)	; &I-C1-213C; [01-28]
     (=big5		. #xA15B)	; &I-B-A15B;
@@ -53,7 +68,10 @@
     (general-category	punctuation open) ; Informative Category
     (bidi-category	. "ON")
     (mirrored		. nil)
-    (->decomposition	vertical #x0028)
+    (<-vertical
+     ((name		  . "LEFT PARENTHESIS")
+      (=ucs		  . #x0028)	; (
+      ))
     (=ucs		. #xFE35)	; ︵
     (=cns11643-1	. #x2140)	; &I-C1-2140; [01-32]
     (=big5		. #xA15F)	; &I-B-A15F;
@@ -63,7 +81,10 @@
     (general-category	punctuation close) ; Informative Category
     (bidi-category	. "ON")
     (mirrored		. nil)
-    (->decomposition	vertical #x0029)
+    (<-vertical
+     ((name		  . "RIGHT PARENTHESIS")
+      (=ucs		  . #x0029)	; )
+      ))
     (=ucs		. #xFE36)	; ︶
     (=cns11643-1	. #x2141)	; &I-C1-2141; [01-33]
     (=big5		. #xA160)	; &I-B-A160;
@@ -73,7 +94,10 @@
     (general-category	punctuation open) ; Informative Category
     (bidi-category	. "ON")
     (mirrored		. nil)
-    (->decomposition	vertical #x007B)
+    (<-vertical
+     ((name		  . "LEFT CURLY BRACKET")
+      (=ucs		  . #x007B)	; {
+      ))
     (=ucs		. #xFE37)	; ︷
     (=cns11643-1	. #x2144)	; &I-C1-2144; [01-36]
     (=big5		. #xA163)	; &I-B-A163;
@@ -83,7 +107,10 @@
     (general-category	punctuation close) ; Informative Category
     (bidi-category	. "ON")
     (mirrored		. nil)
-    (->decomposition	vertical #x007D)
+    (<-vertical
+     ((name		  . "RIGHT CURLY BRACKET")
+      (=ucs		  . #x007D)	; }
+      ))
     (=ucs		. #xFE38)	; ︸
     (=cns11643-1	. #x2145)	; &I-C1-2145; [01-37]
     (=big5		. #xA164)	; &I-B-A164;
@@ -93,7 +120,10 @@
     (general-category	punctuation open) ; Informative Category
     (bidi-category	. "ON")
     (mirrored		. nil)
-    (->decomposition	vertical #x3014)
+    (<-vertical
+     ((name		  . "LEFT TORTOISE SHELL BRACKET")
+      (=ucs		  . #x3014)	; 〔
+      ))
     (=ucs		. #xFE39)	; ︹
     (=cns11643-1	. #x2148)	; &I-C1-2148; [01-40]
     (=big5		. #xA167)	; &I-B-A167;
@@ -103,7 +133,10 @@
     (general-category	punctuation close) ; Informative Category
     (bidi-category	. "ON")
     (mirrored		. nil)
-    (->decomposition	vertical #x3015)
+    (<-vertical
+     ((name		  . "RIGHT TORTOISE SHELL BRACKET")
+      (=ucs		  . #x3015)	; 〕
+      ))
     (=ucs		. #xFE3A)	; ︺
     (=cns11643-1	. #x2149)	; &I-C1-2149; [01-41]
     (=big5		. #xA168)	; &I-B-A168;
@@ -113,7 +146,10 @@
     (general-category	punctuation open) ; Informative Category
     (bidi-category	. "ON")
     (mirrored		. nil)
-    (->decomposition	vertical #x3010)
+    (<-vertical
+     ((name		  . "LEFT BLACK LENTICULAR BRACKET")
+      (=ucs		  . #x3010)	; 【
+      ))
     (=ucs		. #xFE3B)	; ︻
     (=cns11643-1	. #x214C)	; &I-C1-214C; [01-44]
     (=big5		. #xA16B)	; &I-B-A16B;
@@ -123,7 +159,10 @@
     (general-category	punctuation close) ; Informative Category
     (bidi-category	. "ON")
     (mirrored		. nil)
-    (->decomposition	vertical #x3011)
+    (<-vertical
+     ((name		  . "RIGHT BLACK LENTICULAR BRACKET")
+      (=ucs		  . #x3011)	; 】
+      ))
     (=ucs		. #xFE3C)	; ︼
     (=cns11643-1	. #x214D)	; &I-C1-214D; [01-45]
     (=big5		. #xA16C)	; &I-B-A16C;
@@ -133,7 +172,10 @@
     (general-category	punctuation open) ; Informative Category
     (bidi-category	. "ON")
     (mirrored		. nil)
-    (->decomposition	vertical #x300A)
+    (<-vertical
+     ((name		  . "LEFT DOUBLE ANGLE BRACKET")
+      (=ucs		  . #x300A)	; 《
+      ))
     (=ucs		. #xFE3D)	; ︽
     (=cns11643-1	. #x2150)	; &I-C1-2150; [01-48]
     (=big5		. #xA16F)	; &I-B-A16F;
@@ -143,7 +185,10 @@
     (general-category	punctuation close) ; Informative Category
     (bidi-category	. "ON")
     (mirrored		. nil)
-    (->decomposition	vertical #x300B)
+    (<-vertical
+     ((name		  . "RIGHT DOUBLE ANGLE BRACKET")
+      (=ucs		  . #x300B)	; 》
+      ))
     (=ucs		. #xFE3E)	; ︾
     (=cns11643-1	. #x2151)	; &I-C1-2151; [01-49]
     (=big5		. #xA170)	; &I-B-A170;
@@ -153,7 +198,10 @@
     (general-category	punctuation open) ; Informative Category
     (bidi-category	. "ON")
     (mirrored		. nil)
-    (->decomposition	vertical #x3008)
+    (<-vertical
+     ((name		  . "LEFT ANGLE BRACKET")
+      (=ucs		  . #x3008)	; 〈
+      ))
     (=ucs		. #xFE3F)	; ︿
     (=cns11643-1	. #x2154)	; &I-C1-2154; [01-52]
     (=big5		. #xA173)	; &I-B-A173;
@@ -163,7 +211,10 @@
     (general-category	punctuation close) ; Informative Category
     (bidi-category	. "ON")
     (mirrored		. nil)
-    (->decomposition	vertical #x3009)
+    (<-vertical
+     ((name		  . "RIGHT ANGLE BRACKET")
+      (=ucs		  . #x3009)	; 〉
+      ))
     (=ucs		. #xFE40)	; ﹀
     (=cns11643-1	. #x2155)	; &I-C1-2155; [01-53]
     (=big5		. #xA174)	; &I-B-A174;
@@ -173,7 +224,10 @@
     (general-category	punctuation open) ; Informative Category
     (bidi-category	. "ON")
     (mirrored		. nil)
-    (->decomposition	vertical #x300C)
+    (<-vertical
+     ((name		  . "LEFT CORNER BRACKET")
+      (=ucs		  . #x300C)	; 「
+      ))
     (=ucs		. #xFE41)	; ﹁
     (=cns11643-1	. #x2158)	; &I-C1-2158; [01-56]
     (=big5		. #xA177)	; &I-B-A177;
@@ -183,7 +237,10 @@
     (general-category	punctuation close) ; Informative Category
     (bidi-category	. "ON")
     (mirrored		. nil)
-    (->decomposition	vertical #x300D)
+    (<-vertical
+     ((name		  . "RIGHT CORNER BRACKET")
+      (=ucs		  . #x300D)	; 」
+      ))
     (=ucs		. #xFE42)	; ﹂
     (=cns11643-1	. #x2159)	; &I-C1-2159; [01-57]
     (=big5		. #xA178)	; &I-B-A178;
@@ -193,7 +250,10 @@
     (general-category	punctuation open) ; Informative Category
     (bidi-category	. "ON")
     (mirrored		. nil)
-    (->decomposition	vertical #x300E)
+    (<-vertical
+     ((name		  . "LEFT WHITE CORNER BRACKET")
+      (=ucs		  . #x300E)	; 『
+      ))
     (=ucs		. #xFE43)	; ﹃
     (=cns11643-1	. #x215C)	; &I-C1-215C; [01-60]
     (=big5		. #xA17B)	; &I-B-A17B;
@@ -203,7 +263,10 @@
     (general-category	punctuation close) ; Informative Category
     (bidi-category	. "ON")
     (mirrored		. nil)
-    (->decomposition	vertical #x300F)
+    (<-vertical
+     ((name		  . "RIGHT WHITE CORNER BRACKET")
+      (=ucs		  . #x300F)	; 』
+      ))
     (=ucs		. #xFE44)	; ﹄
     (=cns11643-1	. #x215D)	; &I-C1-215D; [01-61]
     (=big5		. #xA17C)	; &I-B-A17C;
@@ -223,7 +286,10 @@
     (general-category	punctuation other) ; Informative Category
     (bidi-category	. "ON")
     (mirrored		. nil)
-    (->decomposition	compat #x203E)
+    (<-compat
+     ((name		  . "OVERLINE")
+      (=ucs		  . #x203E)	; ‾
+      ))
     (=ucs		. #xFE49)	; ﹉
     (=cns11643-1	. #x2227)	; &I-C1-2227; [02-07]
     (=big5		. #xA1C6)	; &I-B-A1C6;
@@ -233,7 +299,10 @@
     (general-category	punctuation other) ; Informative Category
     (bidi-category	. "ON")
     (mirrored		. nil)
-    (->decomposition	compat #x203E)
+    (<-compat
+     ((name		  . "OVERLINE")
+      (=ucs		  . #x203E)	; ‾
+      ))
     (=ucs		. #xFE4A)	; ﹊
     (=cns11643-1	. #x2228)	; &I-C1-2228; [02-08]
     (=big5		. #xA1C7)	; &I-B-A1C7;
@@ -243,7 +312,10 @@
     (general-category	punctuation other) ; Informative Category
     (bidi-category	. "ON")
     (mirrored		. nil)
-    (->decomposition	compat #x203E)
+    (<-compat
+     ((name		  . "OVERLINE")
+      (=ucs		  . #x203E)	; ‾
+      ))
     (=ucs		. #xFE4B)	; ﹋
     (=cns11643-1	. #x222B)	; &I-C1-222B; [02-11]
     (=big5		. #xA1CA)	; &I-B-A1CA;
@@ -253,7 +325,10 @@
     (general-category	punctuation other) ; Informative Category
     (bidi-category	. "ON")
     (mirrored		. nil)
-    (->decomposition	compat #x203E)
+    (<-compat
+     ((name		  . "OVERLINE")
+      (=ucs		  . #x203E)	; ‾
+      ))
     (=ucs		. #xFE4C)	; ﹌
     (=cns11643-1	. #x222C)	; &I-C1-222C; [02-12]
     (=big5		. #xA1CB)	; &I-B-A1CB;
@@ -263,7 +338,10 @@
     (general-category	punctuation connector) ; Informative Category
     (bidi-category	. "ON")
     (mirrored		. nil)
-    (->decomposition	compat #x005F)
+    (<-compat
+     ((name		  . "LOW LINE")
+      (=ucs		  . #x005F)	; _
+      ))
     (=ucs		. #xFE4D)	; ﹍
     (=cns11643-1	. #x2229)	; &I-C1-2229; [02-09]
     (=big5		. #xA1C8)	; &I-B-A1C8;
@@ -273,7 +351,10 @@
     (general-category	punctuation connector) ; Informative Category
     (bidi-category	. "ON")
     (mirrored		. nil)
-    (->decomposition	compat #x005F)
+    (<-compat
+     ((name		  . "LOW LINE")
+      (=ucs		  . #x005F)	; _
+      ))
     (=ucs		. #xFE4E)	; ﹎
     (=cns11643-1	. #x222A)	; &I-C1-222A; [02-10]
     (=big5		. #xA1C9)	; &I-B-A1C9;
@@ -283,7 +364,10 @@
     (general-category	punctuation connector) ; Informative Category
     (bidi-category	. "ON")
     (mirrored		. nil)
-    (->decomposition	compat #x005F)
+    (<-compat
+     ((name		  . "LOW LINE")
+      (=ucs		  . #x005F)	; _
+      ))
     (=ucs		. #xFE4F)	; ﹏
     (=cns11643-1	. #x213D)	; &I-C1-213D; [01-29]
     (=big5		. #xA15C)	; &I-B-A15C;