From: Kenichi Handa <handa@m17n.org>
Date: Thu, 7 Nov 2002 06:31:13 +0000 (+0000)
Subject: Register lao-composition-function in
X-Git-Tag: emacs-pretest-23.0.90~8295^2~1864^2~162
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=9baf74e53c9f2f56253cf432d8f5271575218598;p=emacs.git

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 200d843eb43..d1a43b805c4 100644
--- 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 "(1QTUVWXY[\hijklm(B"))
+  (dotimes (i (length chars))
+    (aset composition-function-table (aref chars i)
+	  'lao-composition-function)))
 
 (provide 'lao)