From: Kenichi Handa <handa@m17n.org>
Date: Sun, 13 Feb 2000 23:50:32 +0000 (+0000)
Subject: Setup case table for Vietnamese.
X-Git-Tag: emacs-pretest-21.0.90~5024
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=e5dd1155a49d27ddbfd5810f59f1c38c54e821fe;p=emacs.git

Setup case table for Vietnamese.
---

diff --git a/lisp/international/characters.el b/lisp/international/characters.el
index 170575eae78..b10032cd2ff 100644
--- a/lisp/international/characters.el
+++ b/lisp/international/characters.el
@@ -557,6 +557,14 @@
   (modify-category-entry upper ?l)	; latin characters.
   )
 
+(let ((tbl (standard-case-table))
+      (i 32))
+  (while (< i 128)
+    (set-case-syntax-pair (make-char 'vietnamese-viscii-upper i)
+			  (make-char 'vietnamese-viscii-lower i)
+			  tbl)
+    (setq i (1+ i))))
+
 
 ;;; Setting word boundary.