Mercurial > emacs

diff lisp/language/burmese.el @ 107307:b1fd8a6d130f

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Change "myanmar" to "burmese"
author Kenichi Handa <handa@m17n.org>
date Mon, 01 Mar 2010 20:34:11 +0900
parents f24a9a68524d
children 376148b31b5e
line wrap: on
line diff
--- a/lisp/language/burmese.el	Sat Feb 27 16:24:12 2010 +0900
+++ b/lisp/language/burmese.el	Mon Mar 01 20:34:11 2010 +0900
@@ -36,7 +36,7 @@
 	     (sample-text . "Burmese (မ္ရန္‌မာ)	မင္‍ဂလာပာ")
 	     (documentation . t)))
 
-(defvar myanmar-composable-pattern
+(defvar burmese-composable-pattern
   (let ((table
 	 '(("K" . "[\u1004\u105A]\u103A\u1039") ; KINZI sequence
 	   ("C" . "[\u1000-\u102A\u103F\u1041-\u1049\u104E\u105A-\u105D\u1061\u1065-\u1066\u106E\u1071\u1075\u1081\u108E\uAA60-\uAA6F\uAA71-\uAA76]") ; consonant and vowel letter
@@ -52,7 +52,7 @@
 					       regexp t t))))
     regexp))
 
-(let ((elt (list (vector myanmar-composable-pattern 0 'font-shape-gstring)
+(let ((elt (list (vector burmese-composable-pattern 0 'font-shape-gstring)
 		 (vector "." 0 'font-shape-gstring))))
   (set-char-table-range composition-function-table '(#x1000 . #x107F) elt)
   (set-char-table-range composition-function-table '(#xAA60 . #xAA7B) elt))