Mercurial > emacs
changeset 27691:5ed8dd27c116
Setup case table for Vietnamese.
author | Kenichi Handa <handa@m17n.org> |
---|---|
date | Sun, 13 Feb 2000 23:50:32 +0000 |
parents | fa3a58da3aa9 |
children | bb0e45f6ca86 |
files | lisp/international/characters.el |
diffstat | 1 files changed, 8 insertions(+), 0 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/international/characters.el Sun Feb 13 23:50:09 2000 +0000 +++ b/lisp/international/characters.el Sun Feb 13 23:50:32 2000 +0000 @@ -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.