Skip to content
GitLab
Projects
Groups
Snippets
Help
Loading...
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in / Register
Toggle navigation
Open sidebar
emacs
emacs
Commits
d99ea08e
Commit
d99ea08e
authored
Mar 01, 2010
by
Kenichi Handa
Browse files
Change "myanmar" to "burmese"
parent
4ed28cf4
Changes
4
Hide whitespace changes
Inline
Side-by-side
Showing
4 changed files
with
21 additions
and
8 deletions
+21
-8
lisp/ChangeLog
lisp/ChangeLog
+13
-0
lisp/international/characters.el
lisp/international/characters.el
+2
-2
lisp/international/fontset.el
lisp/international/fontset.el
+4
-4
lisp/language/burmese.el
lisp/language/burmese.el
+2
-2
No files found.
lisp/ChangeLog
View file @
d99ea08e
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.
2010-02-27 Jeremy Whitlock <jcscoobyrs@gmail.com> (tiny change)
* progmodes/python.el (python-pdbtrack-stack-entry-regexp): Allow
...
...
lisp/international/characters.el
View file @
d99ea08e
...
...
@@ -1124,7 +1124,7 @@ Setup char-width-table appropriate for non-CJK language environment."
(
#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 @@ Setup char-width-table appropriate for non-CJK language environment."
(
#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
)
...
...
lisp/international/fontset.el
View file @
d99ea08e
...
...
@@ -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
))
,
(
font-spec
:registry
"iso10646-1"
:script
'
myanmar
))
(
burmese
,
(
font-spec
:registry
"iso10646-1"
:otf
'
(
mymr
))
,
(
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
)
...
...
lisp/language/burmese.el
View file @
d99ea08e
...
...
@@ -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
))
...
...
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
.
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment