X-Git-Url: http://git.chise.org/gitweb/?a=blobdiff_plain;f=lisp%2Futf-2000%2Fu00C80-Kannada.el;h=79c6a946e266cc7bc804082cadae76944d166bfa;hb=5e56231eedf71b385fb265f788abfae1c3529e0d;hp=c31ed1bd673ce73cd20906d67826f005b483a14a;hpb=dcdb09ceba33dafef889d5b01f97d0e576a89361;p=chise%2Fxemacs-chise.git.1

diff --git a/lisp/utf-2000/u00C80-Kannada.el b/lisp/utf-2000/u00C80-Kannada.el
index c31ed1b..79c6a94 100644
--- a/lisp/utf-2000/u00C80-Kannada.el
+++ b/lisp/utf-2000/u00C80-Kannada.el
@@ -1,4 +1,4 @@
-;; -*- coding: utf-8-mcs -*-
+;; -*- coding: utf-8-mcs-er -*-
 (define-char
   '((name		. "KANNADA SIGN ANUSVARA")
     (general-category	mark spacing-combining) ; Normative Category
@@ -375,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
@@ -418,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
@@ -426,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
@@ -434,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
@@ -442,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