- Add some auto-generated `<-canonical' features.
authortomo <tomo>
Wed, 27 Jul 2005 03:51:16 +0000 (03:51 +0000)
committertomo <tomo>
Wed, 27 Jul 2005 03:51:16 +0000 (03:51 +0000)
- Use `->canonical' instead of `->decomposition' for
  canonical mapping to single character.
- Use `=decomposition' instead of `->decomposition'.

lisp/utf-2000/u00300-Combining-Diacritical-Marks.el

index f786210..e9a7142 100644 (file)
@@ -5,6 +5,10 @@
     (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;
     (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;
     (bidi-category     . "NSM")
     (mirrored          . nil)
     (iso-10646-comment . "Psili")
+    (<-canonical
+     ((name              . "COMBINING GREEK KORONIS")
+      (=ucs              . #x0343)     ; ̓
+      ))
     (=ucs              . #x0313)       ; ̓
     ))
 (define-char
     (bidi-category     . "NSM")
     (mirrored          . nil)
     (iso-10646-comment . "Vietnamese")
-    (->decomposition   #x0300)
+    (->canonical
+     ((name              . "COMBINING GRAVE ACCENT")
+      (=ucs              . #x0300)     ; ̀
+      ))
     (=ucs              . #x0340)       ; ̀
     ))
 (define-char
     (bidi-category     . "NSM")
     (mirrored          . nil)
     (iso-10646-comment . "Vietnamese")
-    (->decomposition   #x0301)
+    (->canonical
+     ((name              . "COMBINING ACUTE ACCENT")
+      (=ucs              . #x0301)     ; ́
+      ))
     (=ucs              . #x0341)       ; ́
     ))
 (define-char
     (general-category  mark non-spacing) ; Normative Category
     (bidi-category     . "NSM")
     (mirrored          . nil)
-    (->decomposition   #x0313)
+    (->canonical
+     ((name              . "COMBINING COMMA ABOVE")
+      (=ucs              . #x0313)     ; ̓
+      ))
     (=ucs              . #x0343)       ; ̓
     ))
 (define-char
     (general-category  mark non-spacing) ; Normative Category
     (bidi-category     . "NSM")
     (mirrored          . nil)
-    (->decomposition   #x0308 #x0301)
+    (=decomposition
+     ((name              . "COMBINING DIAERESIS")
+      (=ucs              . #x0308)     ; ̈
+      )
+     ((name              . "COMBINING ACUTE ACCENT")
+      (=ucs              . #x0301)     ; ́
+      ))
     (=ucs              . #x0344)       ; ̈́
     ))
 (define-char