(thai-composition-function): Fix args to compose-string.

diff --git a/lisp/language/thai-util.el b/lisp/language/thai-util.el
index 6c6744424ff2c0cd0f2ba5b69771a22ed90edbdc..0ed2a6ff9e4833e047e5fc44da31111018f54d54 100644 (file)
--- a/lisp/language/thai-util.el
+++ b/lisp/language/thai-util.el
@@ -197,7 +197,7 @@ The return value is number of composed characters."
   (if (< (1+ from) to)
       (prog1 (- to from)
        (if string
-           (compose-string from to)
+           (compose-string string from to)
          (compose-region from to))
        (- to from))))