Register lao-composition-function in

composition-function-table for Lao vowels and tones.
(lao): Don't use lao-post-read-conversion.

diff --git a/lisp/language/lao.el b/lisp/language/lao.el
index 200d843eb43cffebbabee54e02146325289e46ec..d1a43b805c4caa25ca420a67faa2d77a442f68e6 100644 (file)
--- a/lisp/language/lao.el
+++ b/lisp/language/lao.el
@@ -42,11 +42,11 @@
         (features lao-util)
         (documentation . t)))
 
-;; Register a function to compose Lao characters.
-(set-char-table-range composition-function-table
-                     '(#x0F00 . #x0F7F) 
-                     '(("\\c0\\c9?\\(\\(\\c2\\|\\c3\\)\\c4?\\|\\c4\\)?"
-                        . lao-composition-function)))
+;; For automatic composition.
+(let ((chars "\e(1QTUVWXY[\hijklm\e(B"))
+  (dotimes (i (length chars))
+    (aset composition-function-table (aref chars i)
+         'lao-composition-function)))
 
 (provide 'lao)