Modify docstring of char category

1.  Change char category 5 to symbol.  Adjust category definition
of Tibetan characters and Thai characters for this change.

diff --git a/lisp/international/characters.el b/lisp/international/characters.el
index ac6f3b33a2910103a6017daa5f9af5b0bcb5e572..65f2a8963e8deb0a72854a3e061af784566104bc 100644 (file)
--- a/lisp/international/characters.el
+++ b/lisp/international/characters.el
@@ -66,11 +66,11 @@
 ;; For phonetic classifications.
 
 (define-category ?0 "consonant")
-(define-category ?1 "base vowel")
+(define-category ?1 "base (independent) vowel")
 (define-category ?2 "upper diacritical mark (including upper vowel)")
 (define-category ?3 "lower diacritical mark (including lower vowel)")
 (define-category ?4 "tone mark")
-(define-category ?5 "vowel")
+(define-category ?5 "symbol")
 (define-category ?6 "digit")
 (define-category ?7 "vowel-modifying diacritical mark")
 (define-category ?8 "vowel-signs")
@@ -192,7 +192,7 @@
 (let ((deflist '(;; chars      syntax  category
                  ("\e$(5!!!"!#\e(B"      "w"     ?7) ; vowel-modifying diacritical mark
                                            ; chandrabindu, anuswar, visarga
-                 ("\e$(5!$\e(B-\e$(5!2\e(B"        "w"     ?5) ; independent vowel
+                 ("\e$(5!$\e(B-\e$(5!2\e(B"        "w"     ?1) ; independent vowel
                  ("\e$(5!3\e(B-\e$(5!X\e(B"        "w"     ?0) ; consonant
                  ("\e$(5!Z\e(B-\e$(5!g\e(B"        "w"     ?8) ; matra
                  ("\e$(5!q\e(B-\e$(5!z\e(B"        "w"     ?6) ; digit
@@ -357,7 +357,7 @@
                  ("\e(1XY\e(B"           "w"     ?3) ; vowel lower
                  ("\e(1h\e(B-\e(1l\e(B"    "w"     ?4) ; tone mark 
                  ("\e(1\\e(B"            "w"     ?9) ; semivowel lower
-                 ("\e(1p\e(B-\e(1y\e(B"    "w"     ?0) ; digit and misc
+                 ("\e(1p\e(B-\e(1y\e(B"    "w"     ?6) ; digit
                  ("\e(1Of\e(B"           "_"     ?0) ; symbol
                  ))
       elm chars len syntax category to ch i)
@@ -391,8 +391,8 @@
                  ("\e,TQT\e(B-\e,TWgn\e(B" "w"     ?2) ; vowel upper
                  ("\e,TX\e(B-\e,TZ\e(B"    "w"     ?3) ; vowel lower
                  ("\e,Th\e(B-\e,Tm\e(B"    "w"     ?4) ; tone mark 
-                 ("\e,TOfp\e(B-\e,Ty\e(B"  "w"     ?0) ; digit and misc
-                 ("\e,T_oz{\e(B" "_"     ?0) ; symbol
+                 ("\e,Tp\e(B-\e,Ty\e(B"    "w"     ?6) ; digit
+                 ("\e,TOf_oz{\e(B"       "_"     ?5) ; symbol
                  ))
       elm chars len syntax category to ch i)
   (while deflist