summaryrefslogtreecommitdiff
path: root/lisp/international/characters.el
diff options
context:
space:
mode:
authorKenichi Handa <handa@m17n.org>2000-06-01 10:59:27 +0000
committerKenichi Handa <handa@m17n.org>2000-06-01 10:59:27 +0000
commite6f023725d964ffb1e0618ae3a305daa3a921a4c (patch)
tree9e5fc5f5d20b0b63f0d2a1ad9b309b6cc77e0033 /lisp/international/characters.el
parent1513ad08f16ee89e4e760990151feb29b880f380 (diff)
downloademacs-e6f023725d964ffb1e0618ae3a305daa3a921a4c.tar.gz
Fix syntax/category setting of Tibetan characters.
Diffstat (limited to 'lisp/international/characters.el')
-rw-r--r--lisp/international/characters.el8
1 files changed, 4 insertions, 4 deletions
diff --git a/lisp/international/characters.el b/lisp/international/characters.el
index b10032cd2ff..90c0bcc2927 100644
--- a/lisp/international/characters.el
+++ b/lisp/international/characters.el
@@ -509,20 +509,20 @@
(modify-category-entry (make-char 'tibetan-1-column) ?q)
(let ((deflist '(;; chars syntax category
- ("$(7"!(B-$(7"J(B" "w" ?0) ; consonant
- ("$(7#!(B-$(7#J#P#Q(B" "w" ?0) ;
+ ("$(7"!(B-$(7"J"K(B" "w" ?0) ; consonant
+ ("$(7#!(B-$(7#J#K#L#M!"!#(B" "w" ?0) ;
("$(7$!(B-$(7$e(B" "w" ?0) ;
("$(7%!(B-$(7%u(B" "w" ?0) ;
("$(7"S"["\"]"^"a(B" "w" ?2) ; upper vowel
("$(7"_"c"d"g"h"i"j"k"l(B" "w" ?2) ; upper modifier
- ("$(7!I"Q"U"e!e!g(B" "w" ?3) ; lowel vowel/modifier
+ ("$(7!I"Q"R"U"e!e!g(B" "w" ?3) ; lowel vowel/modifier
("$(7!P(B-$(7!Y!Z(B-$(7!c(B" "w" ?6) ; digit
("$(7!;!=(B-$(7!B!D"`(B" "." ?|) ; line-break char
("$(8!;!=!?!@!A!D"`(B" "." ?|) ;
("$(7!8!;!=(B-$(7!B!D"`!m!d(B" "." ?>) ; prohibition
("$(8!;!=!?!@!A!D"`(B" "." ?>) ;
("$(7!0(B-$(7!:!l#R#S"f(B" "." ?<) ; prohibition
- ("$(7!C!E(B-$(7!H!J(B-$(7!O!f!h(B-$(7!k!n!o(B" "." ?q) ; others
+ ("$(7!C!E(B-$(7!H!J(B-$(7!O!f!h(B-$(7!k!n!o#O#P(B-$(7#`(B" "." ?q) ; others
))
elm chars len syntax category to ch i)
(while deflist