# HG changeset patch
# User Kenichi Handa <handa@m17n.org>
# Date 967683109 0
# Node ID 6776ea6625376e5b6473a1adf3daf77103d57296
# Parent  59a63d8356146f317c58320f9a4b637f4747c595
(thai-generate-quail-map): If the length of
translation is more than one, compose it.

diff -r 59a63d835614 -r 6776ea662537 leim/quail/thai.el
--- a/leim/quail/thai.el	Thu Aug 31 00:51:29 2000 +0000
+++ b/leim/quail/thai.el	Thu Aug 31 00:51:49 2000 +0000
@@ -51,7 +51,7 @@
 	    nil
 	  (if (> (length trans) 1)
 	      (setq ptype 'voweltone
-		    trans (vector trans))
+		    trans (vector (compose-string trans)))
 	    (setq ptype (get-char-code-property (aref trans 0) 'phonetic-type))
 	    (cond ((memq ptype '(vowel-upper vowel-lower))
 		   (setq ptype 'vowel))