From e2a20aa7918fe70d13423b43e8cc72e2a94d6dfc Mon Sep 17 00:00:00 2001 From: Kenichi Handa Date: Mon, 6 Nov 2000 00:10:50 +0000 Subject: [PATCH] ("Thai"): Set a lisp form that produces composed string in `sample-text' language info. --- lisp/language/thai.el | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) diff --git a/lisp/language/thai.el b/lisp/language/thai.el index addb4381e6d..17b62619be6 100644 --- a/lisp/language/thai.el +++ b/lisp/language/thai.el @@ -49,7 +49,9 @@ (input-method . "thai-kesmanee") (unibyte-display . thai-tis620) (features thai-util) - (sample-text . "Thai (,T@RIRd7B(B) ,TJ0GQ1J04U1$0CQ1:(B, ,TJ0GQ1J04U10$h1P(B") + (sample-text + . (thai-compose-string + (copy-sequence "Thai (,T@RIRd7B(B) ,TJ0GQ1J04U1$0CQ1:(B, ,TJ0GQ1J04U10$h1P(B"))) (documentation . t))) -- 2.39.5