(thai-generate-quail-map): If the length of

translation is more than one, compose it.
This commit is contained in:
Kenichi Handa 2000-08-31 00:51:49 +00:00
parent 5724ab7a64
commit 41c939cf02

View file

@ -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))