aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorKenichi Handa2000-06-01 10:59:27 +0000
committerKenichi Handa2000-06-01 10:59:27 +0000
commite6f023725d964ffb1e0618ae3a305daa3a921a4c (patch)
tree9e5fc5f5d20b0b63f0d2a1ad9b309b6cc77e0033
parent1513ad08f16ee89e4e760990151feb29b880f380 (diff)
downloademacs-e6f023725d964ffb1e0618ae3a305daa3a921a4c.tar.gz
emacs-e6f023725d964ffb1e0618ae3a305daa3a921a4c.zip
Fix syntax/category setting of Tibetan characters.
-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 @@
509(modify-category-entry (make-char 'tibetan-1-column) ?q) 509(modify-category-entry (make-char 'tibetan-1-column) ?q)
510 510
511(let ((deflist '(;; chars syntax category 511(let ((deflist '(;; chars syntax category
512 ("$(7"!(B-$(7"J(B" "w" ?0) ; consonant 512 ("$(7"!(B-$(7"J"K(B" "w" ?0) ; consonant
513 ("$(7#!(B-$(7#J#P#Q(B" "w" ?0) ; 513 ("$(7#!(B-$(7#J#K#L#M!"!#(B" "w" ?0) ;
514 ("$(7$!(B-$(7$e(B" "w" ?0) ; 514 ("$(7$!(B-$(7$e(B" "w" ?0) ;
515 ("$(7%!(B-$(7%u(B" "w" ?0) ; 515 ("$(7%!(B-$(7%u(B" "w" ?0) ;
516 ("$(7"S"["\"]"^"a(B" "w" ?2) ; upper vowel 516 ("$(7"S"["\"]"^"a(B" "w" ?2) ; upper vowel
517 ("$(7"_"c"d"g"h"i"j"k"l(B" "w" ?2) ; upper modifier 517 ("$(7"_"c"d"g"h"i"j"k"l(B" "w" ?2) ; upper modifier
518 ("$(7!I"Q"U"e!e!g(B" "w" ?3) ; lowel vowel/modifier 518 ("$(7!I"Q"R"U"e!e!g(B" "w" ?3) ; lowel vowel/modifier
519 ("$(7!P(B-$(7!Y!Z(B-$(7!c(B" "w" ?6) ; digit 519 ("$(7!P(B-$(7!Y!Z(B-$(7!c(B" "w" ?6) ; digit
520 ("$(7!;!=(B-$(7!B!D"`(B" "." ?|) ; line-break char 520 ("$(7!;!=(B-$(7!B!D"`(B" "." ?|) ; line-break char
521 ("$(8!;!=!?!@!A!D"`(B" "." ?|) ; 521 ("$(8!;!=!?!@!A!D"`(B" "." ?|) ;
522 ("$(7!8!;!=(B-$(7!B!D"`!m!d(B" "." ?>) ; prohibition 522 ("$(7!8!;!=(B-$(7!B!D"`!m!d(B" "." ?>) ; prohibition
523 ("$(8!;!=!?!@!A!D"`(B" "." ?>) ; 523 ("$(8!;!=!?!@!A!D"`(B" "." ?>) ;
524 ("$(7!0(B-$(7!:!l#R#S"f(B" "." ?<) ; prohibition 524 ("$(7!0(B-$(7!:!l#R#S"f(B" "." ?<) ; prohibition
525 ("$(7!C!E(B-$(7!H!J(B-$(7!O!f!h(B-$(7!k!n!o(B" "." ?q) ; others 525 ("$(7!C!E(B-$(7!H!J(B-$(7!O!f!h(B-$(7!k!n!o#O#P(B-$(7#`(B" "." ?q) ; others
526 )) 526 ))
527 elm chars len syntax category to ch i) 527 elm chars len syntax category to ch i)
528 (while deflist 528 (while deflist