Mercurial > emacs
changeset 29362:038c13f83357
Fix syntax/category setting of Tibetan characters.
author | Kenichi Handa <handa@m17n.org> |
---|---|
date | Thu, 01 Jun 2000 10:59:27 +0000 |
parents | a459df8781d0 |
children | 1ebd8db9c3dc |
files | lisp/international/characters.el |
diffstat | 1 files changed, 4 insertions(+), 4 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/international/characters.el Thu Jun 01 07:03:07 2000 +0000 +++ b/lisp/international/characters.el Thu Jun 01 10:59:27 2000 +0000 @@ -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