Mercurial > emacs

changeset 97986:64b0e68e3313

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Fix setting of composition-function-table.
author Kenichi Handa <handa@m17n.org>
date Fri, 05 Sep 2008 01:00:30 +0000
parents 26069577e76b
children 0bbf217fdc32
files lisp/language/tibetan.el
diffstat 1 files changed, 3 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/language/tibetan.el	Fri Sep 05 00:53:00 2008 +0000
+++ b/lisp/language/tibetan.el	Fri Sep 05 01:00:30 2008 +0000
@@ -604,8 +604,9 @@
 (defvar tibetan-decomposed-temp nil)
 
 ;; For automatic composition.
-(set-char-table-range composition-function-table '(#xF00 . #xFD1)
-		      '(("[\xF00-\xFD1]+" . tibetan-composition-function)))
+(set-char-table-range 
+ composition-function-table '(#xF00 . #xFD1)
+ (list (vector tibetan-composable-pattern 0 'font-shape-gstring)))
 
 (provide 'tibetan)