Mercurial > emacs
changeset 107309:372a2c256194
Change "myanmar" to "burmese"
| author | Kenichi Handa <handa@m17n.org> |
|---|---|
| date | Mon, 01 Mar 2010 20:52:21 +0900 |
| parents | 0b830883578a (current diff) e2efddfebd89 (diff) |
| children | 94dd0c99026d |
| files | |
| diffstat | 4 files changed, 21 insertions(+), 8 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/ChangeLog Mon Mar 01 11:31:42 2010 +0000 +++ b/lisp/ChangeLog Mon Mar 01 20:52:21 2010 +0900 @@ -1,3 +1,16 @@ +2010-03-01 Kenichi Handa <handa@m17n.org> + + * language/burmese.el (burmese-composable-pattern): Renamed from + myanmar-composable-pattern. + + * international/characters.el (script-list): Change myanmar to + burmese. + + * international/fontset.el (script-representative-chars): Change + myanmar to burmese. + (otf-script-alist): Likewise. + (setup-default-fontset): Likewise. Re-fix :otf spec. + 2010-03-01 Alan Mackenzie <bug-cc-mode@gnu.org> * cc-engine.el (c-remove-stale-state-cache): Take account of when
--- a/lisp/international/characters.el Mon Mar 01 11:31:42 2010 +0000 +++ b/lisp/international/characters.el Mon Mar 01 20:52:21 2010 +0900 @@ -1124,7 +1124,7 @@ (#x0E00 #x0E5F thai) (#x0E80 #x0EDF lao) (#x0F00 #x0FFF tibetan) - (#x1000 #x109F myanmar) + (#x1000 #x109F burmese) (#x10A0 #x10FF georgian) (#x1100 #x11FF hangul) (#x1200 #x139F ethiopic) @@ -1151,7 +1151,7 @@ (#x3400 #x9FAF han) (#xA000 #xA4CF yi) (#xAA00 #xAA5F cham) - (#xAA60 #xAA7B myanmar) + (#xAA60 #xAA7B burmese) (#xAA80 #xAADF tai-viet) (#xAC00 #xD7AF hangul) (#xF900 #xFAFF han)
--- a/lisp/international/fontset.el Mon Mar 01 11:31:42 2010 +0000 +++ b/lisp/international/fontset.el Mon Mar 01 20:52:21 2010 +0900 @@ -169,7 +169,7 @@ (thai #xE17) (lao #xEA5) (tibetan #xF40) - (myanmar #x1000) + (burmese #x1000) (georgian #x10D3) (ethiopic #x1208) (cherokee #x13B6) @@ -260,7 +260,7 @@ (math . mathematical) (mong . mongolian) (musc . musical-symbol) - (mymr . myanmar) + (mymr . burmese) (nko\ . nko) (ogam . ogham) (ital . old_italic) @@ -415,8 +415,8 @@ (sinhala ,(font-spec :registry "iso10646-1" :otf '(sinh nil (akhn)))) (malayalam ,(font-spec :registry "iso10646-1" :otf '(mlym nil (akhn)))) - (myanmar ,(font-spec :registry "iso10646-1" :otf '(mymr brm (liga mark))) - ,(font-spec :registry "iso10646-1" :script 'myanmar)) + (burmese ,(font-spec :registry "iso10646-1" :otf '(mymr nil nil)) + ,(font-spec :registry "iso10646-1" :script 'burmese)) (lao ,(font-spec :registry "iso10646-1" :otf '(lao\ nil nil (mark))) ,(font-spec :registry "iso10646-1" :script 'lao)
--- a/lisp/language/burmese.el Mon Mar 01 11:31:42 2010 +0000 +++ b/lisp/language/burmese.el Mon Mar 01 20:52:21 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))