Fix setting of composition-function-table.

2 files changed, 5 insertions, 1 deletions

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 64a70052890..ec8c0c21d89 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,7 @@
+2008-09-17  Kenichi Handa  <handa@m17n.org>
+
+        * language/burmese.el: Fix setting of composition-function-table.
+
 2008-09-17  Martin Rudalics  <rudalics@gmx.at>
 
         * info.el (Info-follow-nearest-node): Don't raise an error for
diff --git a/lisp/language/burmese.el b/lisp/language/burmese.el
index 2cc1c89a0bb..ee31767bd14 100644
--- a/lisp/language/burmese.el
+++ b/lisp/language/burmese.el
@@ -37,6 +37,6 @@
              (documentation . t)))
 
 (set-char-table-range composition-function-table '(#x1000 . #x107F)
-                      '(("[\x1000-\x107F\x200C\x200D]+" . font-shape-text)))
+                      '(["[\x1000-\x107F\x200C\x200D]+" 0 font-shape-gstring]))
 
 ;; arch-tag: 8ba5f4cd-ef89-4008-b784-397edd0cb32e