X-Git-Url: http://git.chise.org/gitweb/?a=blobdiff_plain;f=lisp%2Futf-2000%2Fu03190-Kanbun.el;h=93f41539a648c87f66ee0a3a0c3a24ff78325533;hb=abfb9f2ab68f5f04c605587402e554920b8db230;hp=82b5e15a0d41c850e74624247212f24b00d35355;hpb=dcdb09ceba33dafef889d5b01f97d0e576a89361;p=chise%2Fxemacs-chise.git.1

diff --git a/lisp/utf-2000/u03190-Kanbun.el b/lisp/utf-2000/u03190-Kanbun.el
index 82b5e15..93f4153 100644
--- a/lisp/utf-2000/u03190-Kanbun.el
+++ b/lisp/utf-2000/u03190-Kanbun.el
@@ -1,4 +1,4 @@
-;; -*- coding: utf-8-mcs -*-
+;; -*- coding: utf-8-mcs-er -*-
 (define-char
   '((name		. "IDEOGRAPHIC ANNOTATION LINKING MARK")
     (general-category	symbol other) ; Informative Category
@@ -21,8 +21,10 @@
     (bidi-category	. "L")
     (mirrored		. nil)
     (iso-10646-comment	. "Kaeriten")
-    (->decomposition	super #x4E00)
     (=ucs		. #x3192)	; ㆒
+    (<-superscript
+     ((=ucs		  . #x4E00)	; 一
+      ))
     ))
 (define-char
   '((name		. "IDEOGRAPHIC ANNOTATION TWO MARK")
@@ -30,8 +32,10 @@
     (bidi-category	. "L")
     (mirrored		. nil)
     (iso-10646-comment	. "Kaeriten")
-    (->decomposition	super #x4E8C)
     (=ucs		. #x3193)	; ㆓
+    (<-superscript
+     ((=ucs		  . #x4E8C)	; 二
+      ))
     ))
 (define-char
   '((name		. "IDEOGRAPHIC ANNOTATION THREE MARK")
@@ -39,8 +43,10 @@
     (bidi-category	. "L")
     (mirrored		. nil)
     (iso-10646-comment	. "Kaeriten")
-    (->decomposition	super #x4E09)
     (=ucs		. #x3194)	; ㆔
+    (<-superscript
+     ((=ucs		  . #x4E09)	; 三
+      ))
     ))
 (define-char
   '((name		. "IDEOGRAPHIC ANNOTATION FOUR MARK")
@@ -48,8 +54,10 @@
     (bidi-category	. "L")
     (mirrored		. nil)
     (iso-10646-comment	. "Kaeriten")
-    (->decomposition	super #x56DB)
     (=ucs		. #x3195)	; ㆕
+    (<-superscript
+     ((=ucs		  . #x56DB)	; 四
+      ))
     ))
 (define-char
   '((name		. "IDEOGRAPHIC ANNOTATION TOP MARK")
@@ -57,8 +65,10 @@
     (bidi-category	. "L")
     (mirrored		. nil)
     (iso-10646-comment	. "Kaeriten")
-    (->decomposition	super #x4E0A)
     (=ucs		. #x3196)	; ㆖
+    (<-superscript
+     ((=ucs		  . #x4E0A)	; 上
+      ))
     ))
 (define-char
   '((name		. "IDEOGRAPHIC ANNOTATION MIDDLE MARK")
@@ -66,8 +76,10 @@
     (bidi-category	. "L")
     (mirrored		. nil)
     (iso-10646-comment	. "Kaeriten")
-    (->decomposition	super #x4E2D)
     (=ucs		. #x3197)	; ㆗
+    (<-superscript
+     ((=ucs		  . #x4E2D)	; 中
+      ))
     ))
 (define-char
   '((name		. "IDEOGRAPHIC ANNOTATION BOTTOM MARK")
@@ -75,8 +87,10 @@
     (bidi-category	. "L")
     (mirrored		. nil)
     (iso-10646-comment	. "Kaeriten")
-    (->decomposition	super #x4E0B)
     (=ucs		. #x3198)	; ㆘
+    (<-superscript
+     ((=ucs		  . #x4E0B)	; 下
+      ))
     ))
 (define-char
   '((name		. "IDEOGRAPHIC ANNOTATION FIRST MARK")
@@ -84,8 +98,10 @@
     (bidi-category	. "L")
     (mirrored		. nil)
     (iso-10646-comment	. "Kaeriten")
-    (->decomposition	super #x7532)
     (=ucs		. #x3199)	; ㆙
+    (<-superscript
+     ((=ucs		  . #x7532)	; 甲
+      ))
     ))
 (define-char
   '((name		. "IDEOGRAPHIC ANNOTATION SECOND MARK")
@@ -93,8 +109,10 @@
     (bidi-category	. "L")
     (mirrored		. nil)
     (iso-10646-comment	. "Kaeriten")
-    (->decomposition	super #x4E59)
     (=ucs		. #x319A)	; ㆚
+    (<-superscript
+     ((=ucs		  . #x4E59)	; 乙
+      ))
     ))
 (define-char
   '((name		. "IDEOGRAPHIC ANNOTATION THIRD MARK")
@@ -102,8 +120,10 @@
     (bidi-category	. "L")
     (mirrored		. nil)
     (iso-10646-comment	. "Kaeriten")
-    (->decomposition	super #x4E19)
     (=ucs		. #x319B)	; ㆛
+    (<-superscript
+     ((=ucs		  . #x4E19)	; 丙
+      ))
     ))
 (define-char
   '((name		. "IDEOGRAPHIC ANNOTATION FOURTH MARK")
@@ -111,8 +131,10 @@
     (bidi-category	. "L")
     (mirrored		. nil)
     (iso-10646-comment	. "Kaeriten")
-    (->decomposition	super #x4E01)
     (=ucs		. #x319C)	; ㆜
+    (<-superscript
+     ((=ucs		  . #x4E01)	; 丁
+      ))
     ))
 (define-char
   '((name		. "IDEOGRAPHIC ANNOTATION HEAVEN MARK")
@@ -120,8 +142,10 @@
     (bidi-category	. "L")
     (mirrored		. nil)
     (iso-10646-comment	. "Kaeriten")
-    (->decomposition	super #x5929)
     (=ucs		. #x319D)	; ㆝
+    (<-superscript
+     ((=ucs		  . #x5929)	; 天
+      ))
     ))
 (define-char
   '((name		. "IDEOGRAPHIC ANNOTATION EARTH MARK")
@@ -129,8 +153,10 @@
     (bidi-category	. "L")
     (mirrored		. nil)
     (iso-10646-comment	. "Kaeriten")
-    (->decomposition	super #x5730)
     (=ucs		. #x319E)	; ㆞
+    (<-superscript
+     ((=ucs		  . #x5730)	; 地
+      ))
     ))
 (define-char
   '((name		. "IDEOGRAPHIC ANNOTATION MAN MARK")
@@ -138,6 +164,8 @@
     (bidi-category	. "L")
     (mirrored		. nil)
     (iso-10646-comment	. "Kaeriten")
-    (->decomposition	super #x4EBA)
     (=ucs		. #x319F)	; ㆟
+    (<-superscript
+     ((=ucs		  . #x4EBA)	; 人
+      ))
     ))