Mercurial > emacs
diff lisp/international/characters.el @ 27691:5ed8dd27c116
Setup case table for Vietnamese.
author | Kenichi Handa <handa@m17n.org> |
---|---|
date | Sun, 13 Feb 2000 23:50:32 +0000 |
parents | c151d3ae1794 |
children | 038c13f83357 |
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.