Fix syntax/category setting of Tibetan characters.

diff --git a/lisp/international/characters.el b/lisp/international/characters.el
index b10032cd2ff104dae6c74ea59c543bfb7bbd3875..90c0bcc29274447090da3055acf7f7b93de82450 100644 (file)
--- 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
-                 ("\e$(7"!\e(B-\e$(7"J\e(B"                "w"     ?0) ; consonant
-                 ("\e$(7#!\e(B-\e$(7#J#P#Q\e(B"          "w"     ?0) ;
+                 ("\e$(7"!\e(B-\e$(7"J"K\e(B"              "w"     ?0) ; consonant
+                 ("\e$(7#!\e(B-\e$(7#J#K#L#M!"!#\e(B"       "w"     ?0) ;
                  ("\e$(7$!\e(B-\e$(7$e\e(B"              "w"     ?0) ;
                  ("\e$(7%!\e(B-\e$(7%u\e(B"              "w"     ?0) ;
                  ("\e$(7"S"["\"]"^"a\e(B"       "w"      ?2) ; upper vowel
                  ("\e$(7"_"c"d"g"h"i"j"k"l\e(B" "w"      ?2) ; upper modifier
-                 ("\e$(7!I"Q"U"e!e!g\e(B"       "w"      ?3) ; lowel vowel/modifier
+                 ("\e$(7!I"Q"R"U"e!e!g\e(B"       "w"    ?3) ; lowel vowel/modifier
                  ("\e$(7!P\e(B-\e$(7!Y!Z\e(B-\e$(7!c\e(B"            "w"     ?6) ; digit
                  ("\e$(7!;!=\e(B-\e$(7!B!D"`\e(B"        "."     ?|) ; line-break char
                  ("\e$(8!;!=!?!@!A!D"`\e(B"            "."     ?|) ;
                  ("\e$(7!8!;!=\e(B-\e$(7!B!D"`!m!d\e(B"  "."     ?>) ; prohibition
                  ("\e$(8!;!=!?!@!A!D"`\e(B"            "."     ?>) ;
                  ("\e$(7!0\e(B-\e$(7!:!l#R#S"f\e(B"      "."     ?<) ; prohibition
-                 ("\e$(7!C!E\e(B-\e$(7!H!J\e(B-\e$(7!O!f!h\e(B-\e$(7!k!n!o\e(B" "." ?q) ; others
+                 ("\e$(7!C!E\e(B-\e$(7!H!J\e(B-\e$(7!O!f!h\e(B-\e$(7!k!n!o#O#P\e(B-\e$(7#`\e(B" "." ?q) ; others
                  ))
       elm chars len syntax category to ch i)
   (while deflist