X-Git-Url: http://git.chise.org/gitweb/?a=blobdiff_plain;f=lisp%2Futf-2000%2Fu00300-Combining-Diacritical-Marks.el;h=6e9e509b3db5282394233c3486c12c5074f8c52b;hb=5a8df5993fd694479f868a4f725fb8b3f5e5af80;hp=e9a7142e7d0890348d8fda36fed70fba6e74c648;hpb=7010d9ac1fef759269861cf1e6f0ed4b47a6321e;p=chise%2Fxemacs-chise.git

diff --git a/lisp/utf-2000/u00300-Combining-Diacritical-Marks.el b/lisp/utf-2000/u00300-Combining-Diacritical-Marks.el
index e9a7142..6e9e509 100644
--- a/lisp/utf-2000/u00300-Combining-Diacritical-Marks.el
+++ b/lisp/utf-2000/u00300-Combining-Diacritical-Marks.el
@@ -5,10 +5,6 @@
     (bidi-category	. "NSM")
     (mirrored		. nil)
     (iso-10646-comment	. "Varia")
-    (<-canonical
-     ((name		  . "COMBINING GRAVE TONE MARK")
-      (=ucs		  . #x0340)	; ̀
-      ))
     (=ucs		. #x0300)	; ̀
     (=jis-x0213-1-2000	. #x2B5C)	; &I-JX1-2B5C; [11-60]
     (latin-tcvn5712	. #xB0)	; &I-VSCII2-30;
@@ -19,10 +15,6 @@
     (bidi-category	. "NSM")
     (mirrored		. nil)
     (iso-10646-comment	. "Oxia")
-    (<-canonical
-     ((name		  . "COMBINING ACUTE TONE MARK")
-      (=ucs		  . #x0341)	; ́
-      ))
     (=ucs		. #x0301)	; ́
     (=jis-x0213-1-2000	. #x2B5A)	; &I-JX1-2B5A; [11-58]
     (latin-tcvn5712	. #xB3)	; &I-VSCII2-33;
@@ -165,10 +157,6 @@
     (bidi-category	. "NSM")
     (mirrored		. nil)
     (iso-10646-comment	. "Psili")
-    (<-canonical
-     ((name		  . "COMBINING GREEK KORONIS")
-      (=ucs		  . #x0343)	; ̓
-      ))
     (=ucs		. #x0313)	; ̓
     ))
 (define-char
@@ -508,11 +496,11 @@
     (bidi-category	. "NSM")
     (mirrored		. nil)
     (iso-10646-comment	. "Vietnamese")
+    (=ucs		. #x0340)	; ̀
     (->canonical
      ((name		  . "COMBINING GRAVE ACCENT")
       (=ucs		  . #x0300)	; ̀
       ))
-    (=ucs		. #x0340)	; ̀
     ))
 (define-char
   '((name		. "COMBINING ACUTE TONE MARK")
@@ -520,11 +508,11 @@
     (bidi-category	. "NSM")
     (mirrored		. nil)
     (iso-10646-comment	. "Vietnamese")
+    (=ucs		. #x0341)	; ́
     (->canonical
      ((name		  . "COMBINING ACUTE ACCENT")
       (=ucs		  . #x0301)	; ́
       ))
-    (=ucs		. #x0341)	; ́
     ))
 (define-char
   '((name		. "COMBINING GREEK PERISPOMENI")
@@ -538,11 +526,11 @@
     (general-category	mark non-spacing) ; Normative Category
     (bidi-category	. "NSM")
     (mirrored		. nil)
+    (=ucs		. #x0343)	; ̓
     (->canonical
      ((name		  . "COMBINING COMMA ABOVE")
       (=ucs		  . #x0313)	; ̓
       ))
-    (=ucs		. #x0343)	; ̓
     ))
 (define-char
   '((name		. "COMBINING GREEK DIALYTIKA TONOS")
@@ -563,11 +551,11 @@
     (general-category	mark non-spacing) ; Normative Category
     (bidi-category	. "NSM")
     (mirrored		. nil)
+    (=ucs		. #x0345)	; ͅ
     (->uppercase
      ((name		  . "GREEK CAPITAL LETTER IOTA")
       (=ucs		  . #x0399)	; Ι
       ))
-    (=ucs		. #x0345)	; ͅ
     ))
 (define-char
   '((name		. "COMBINING BRIDGE ABOVE")