update.

[chise/xemacs-chise.git.1] / lisp / utf-2000 / u00C80-Kannada.el

diff --git a/lisp/utf-2000/u00C80-Kannada.el b/lisp/utf-2000/u00C80-Kannada.el
index 01ffc0e..79c6a94 100644 (file)
--- a/lisp/utf-2000/u00C80-Kannada.el
+++ b/lisp/utf-2000/u00C80-Kannada.el
@@ -1,3 +1,4 @@
+;; -*- coding: utf-8-mcs-er -*-
 (define-char
   '((name              . "KANNADA SIGN ANUSVARA")
     (general-category  mark spacing-combining) ; Normative Category
@@ -374,7 +375,13 @@
     (general-category  mark spacing-combining) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (->decomposition   #x0CBF #x0CD5)
+    (=decomposition
+     ((name              . "KANNADA VOWEL SIGN I")
+      (=ucs              . #x0CBF)     ; ಿ
+      )
+     ((name              . "KANNADA LENGTH MARK")
+      (=ucs              . #x0CD5)     ; ೕ
+      ))
     (=ucs              . #x0CC0)       ; ೀ
     ))
 (define-char
@@ -417,7 +424,13 @@
     (general-category  mark spacing-combining) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (->decomposition   #x0CC6 #x0CD5)
+    (=decomposition
+     ((name              . "KANNADA VOWEL SIGN E")
+      (=ucs              . #x0CC6)     ; ೆ
+      )
+     ((name              . "KANNADA LENGTH MARK")
+      (=ucs              . #x0CD5)     ; ೕ
+      ))
     (=ucs              . #x0CC7)       ; ೇ
     ))
 (define-char
@@ -425,7 +438,13 @@
     (general-category  mark spacing-combining) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (->decomposition   #x0CC6 #x0CD6)
+    (=decomposition
+     ((name              . "KANNADA VOWEL SIGN E")
+      (=ucs              . #x0CC6)     ; ೆ
+      )
+     ((name              . "KANNADA AI LENGTH MARK")
+      (=ucs              . #x0CD6)     ; ೖ
+      ))
     (=ucs              . #x0CC8)       ; ೈ
     ))
 (define-char
@@ -433,7 +452,13 @@
     (general-category  mark spacing-combining) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (->decomposition   #x0CC6 #x0CC2)
+    (=decomposition
+     ((name              . "KANNADA VOWEL SIGN E")
+      (=ucs              . #x0CC6)     ; ೆ
+      )
+     ((name              . "KANNADA VOWEL SIGN UU")
+      (=ucs              . #x0CC2)     ; ೂ
+      ))
     (=ucs              . #x0CCA)       ; ೊ
     ))
 (define-char
@@ -441,7 +466,13 @@
     (general-category  mark spacing-combining) ; Normative Category
     (bidi-category     . "L")
     (mirrored          . nil)
-    (->decomposition   #x0CCA #x0CD5)
+    (=decomposition
+     ((name              . "KANNADA VOWEL SIGN O")
+      (=ucs              . #x0CCA)     ; ೊ
+      )
+     ((name              . "KANNADA LENGTH MARK")
+      (=ucs              . #x0CD5)     ; ೕ
+      ))
     (=ucs              . #x0CCB)       ; ೋ
     ))
 (define-char