X-Git-Url: http://git.chise.org/gitweb/?a=blobdiff_plain;f=lisp%2Futf-2000%2Fu00C80-Kannada.el;h=79c6a946e266cc7bc804082cadae76944d166bfa;hb=74972ce0e0c9f9b1f7882f0a76fa771046e8d28c;hp=01ffc0e76acd957bab966b5826bcb2bc2907fdda;hpb=a5812bf2ff9a9cf40f4ff78dcb83f5b4c295bd18;p=chise%2Fxemacs-chise.git

diff --git a/lisp/utf-2000/u00C80-Kannada.el b/lisp/utf-2000/u00C80-Kannada.el
index 01ffc0e..79c6a94 100644
--- 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