# HG changeset patch
# User Kenichi Handa <handa@m17n.org>
# Date 959842961 0
# Node ID e7c2078f777707a9dec81fd5865202a7c2c81dad
# Parent  90bf709a2d1c0685db617489a8164a2cdd6b32bd
(thai-composition-function): Fix args to compose-string.

diff -r 90bf709a2d1c -r e7c2078f7777 lisp/language/thai-util.el
--- a/lisp/language/thai-util.el	Thu Jun 01 07:02:10 2000 +0000
+++ b/lisp/language/thai-util.el	Thu Jun 01 07:02:41 2000 +0000
@@ -197,7 +197,7 @@
   (if (< (1+ from) to)
       (prog1 (- to from)
 	(if string
-	    (compose-string from to)
+	    (compose-string string from to)
 	  (compose-region from to))
 	(- to from))))