diff lisp/language/thai-util.el @ 17993:73869115ae0a

Most of setup-LANGUAGE-environment functions are moved form LANGUAGE.el to LANG-util.el. These functions now at first call setup-english-environment to reset various values to the defaults.
author Kenichi Handa <handa@m17n.org>
date Wed, 28 May 1997 03:39:03 +0000
parents a4bf913d6caf
children 0745f30aec66
line wrap: on
line diff
--- a/lisp/language/thai-util.el	Wed May 28 03:37:33 1997 +0000
+++ b/lisp/language/thai-util.el	Wed May 28 03:39:03 1997 +0000
@@ -24,6 +24,13 @@
 
 ;;; Code:
 
+;;;autoload
+(defun setup-thai-environment ()
+  "Setup multilingual environment (MULE) for Thai."
+  (interactive)
+  (setup-8-bit-environment 'thai-tis620 'th-tis620
+			   '("Thai" . "quail-thai")))
+
 ;; Setting information of Thai characters.
 
 (let ((l '((?,T!(B consonant "LETTER KO KAI")				; 0xA1