# HG changeset patch
# User Kenichi Handa <handa@m17n.org>
# Date 1036650673 0
# Node ID a89011cf0b794168edab72c6b3e308b7851284e3
# Parent  e1d0641b8107ae119a987719678252e133d2ed03
Register lao-composition-function in
composition-function-table for Lao vowels and tones.
(lao): Don't use lao-post-read-conversion.

diff -r e1d0641b8107 -r a89011cf0b79 lisp/language/lao.el
--- a/lisp/language/lao.el	Thu Nov 07 06:30:49 2002 +0000
+++ b/lisp/language/lao.el	Thu Nov 07 06:31:13 2002 +0000
@@ -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 "(1QTUVWXY[\hijklm(B"))
+  (dotimes (i (length chars))
+    (aset composition-function-table (aref chars i)
+	  'lao-composition-function)))
 
 (provide 'lao)