From e5dd1155a49d27ddbfd5810f59f1c38c54e821fe Mon Sep 17 00:00:00 2001 From: Kenichi Handa Date: Sun, 13 Feb 2000 23:50:32 +0000 Subject: [PATCH] Setup case table for Vietnamese. --- lisp/international/characters.el | 8 ++++++++ 1 file changed, 8 insertions(+) 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. -- 2.39.5