Mercurial > emacs
changeset 60702:8ae87ebc392b
Fix patterns to be registered in composition-function-table.
author | Kenichi Handa <handa@m17n.org> |
---|---|
date | Fri, 18 Mar 2005 06:48:58 +0000 |
parents | cd94feb048c7 |
children | e3798cf289c0 |
files | lisp/language/thai.el |
diffstat | 1 files changed, 1 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/language/thai.el Fri Mar 18 06:43:15 2005 +0000 +++ b/lisp/language/thai.el Fri Mar 18 06:48:58 2005 +0000 @@ -57,7 +57,7 @@ ;; Register a function to compose Thai characters. -(let ((patterns '(("\\c0\\c4\\|\\c0\\(\\c2\\|\\c3\\)\\c4?" +(let ((patterns '(("\\c0?\\(\\c2\\|\\c3\\|\\c4\\)+" . thai-composition-function)))) (aset composition-function-table (make-char 'thai-tis620) patterns) (dotimes (i (1+ (- #xe7f #xe00)))