From 9765a2bab66d6071f83ed61853d8cddb7bcbc060 Mon Sep 17 00:00:00 2001
From: Kenichi Handa <handa@m17n.org>
Date: Wed, 2 Jul 1997 12:59:43 +0000
Subject: [PATCH] Modify docstring of char category 1.  Change char category 5
 to symbol.  Adjust category definition of Tibetan characters and Thai
 characters for this change.

---
 lisp/international/characters.el | 12 ++++++------
 1 file changed, 6 insertions(+), 6 deletions(-)

diff --git a/lisp/international/characters.el b/lisp/international/characters.el
index ac6f3b33a29..65f2a8963e8 100644
--- 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
 		  ("$(5!!!"!#(B"	"w"	?7) ; vowel-modifying diacritical mark
 					    ; chandrabindu, anuswar, visarga
-		  ("$(5!$(B-$(5!2(B"	"w"	?5) ; independent vowel
+		  ("$(5!$(B-$(5!2(B"	"w"	?1) ; independent vowel
 		  ("$(5!3(B-$(5!X(B"	"w"	?0) ; consonant
 		  ("$(5!Z(B-$(5!g(B"	"w"	?8) ; matra
 		  ("$(5!q(B-$(5!z(B"	"w"	?6) ; digit
@@ -357,7 +357,7 @@
 		  ("(1XY(B"		"w"	?3) ; vowel lower
 		  ("(1h(B-(1l(B"	"w"	?4) ; tone mark 
 		  ("(1\(B"		"w"	?9) ; semivowel lower
-		  ("(1p(B-(1y(B"	"w"	?0) ; digit and misc
+		  ("(1p(B-(1y(B"	"w"	?6) ; digit
 		  ("(1Of(B"		"_"	?0) ; symbol
 		  ))
       elm chars len syntax category to ch i)
@@ -391,8 +391,8 @@
 		  (",TQT(B-,TWgn(B"	"w"	?2) ; vowel upper
 		  (",TX(B-,TZ(B"	"w"	?3) ; vowel lower
 		  (",Th(B-,Tm(B"	"w"	?4) ; tone mark 
-		  (",TOfp(B-,Ty(B"	"w"	?0) ; digit and misc
-		  (",T_oz{(B"	"_"	?0) ; symbol
+		  (",Tp(B-,Ty(B"	"w"	?6) ; digit
+		  (",TOf_oz{(B"	"_"	?5) ; symbol
 		  ))
       elm chars len syntax category to ch i)
   (while deflist
-- 
2.39.2