# HG changeset patch
# User Kenichi Handa <handa@m17n.org>
# Date 885433517 0
# Node ID df8fab27273f3354641c47882d32316fce2d8cdd
# Parent  60bf060b9ab1be5cec4e26fdc64b40c463a74ad4
In setup-LANGUAGE-environment functions, adjust for the change of
setup-8-bit-environment.

diff -r 60bf060b9ab1 -r df8fab27273f lisp/language/cyril-util.el
--- a/lisp/language/cyril-util.el	Thu Jan 22 01:42:20 1998 +0000
+++ b/lisp/language/cyril-util.el	Thu Jan 22 01:45:17 1998 +0000
@@ -28,21 +28,21 @@
   "Setup multilingual environment (MULE) for Cyrillic ISO-8859-5 users."
   (interactive)
   (setup-8-bit-environment "Cyrillic-ISO" 'cyrillic-iso8859-5
-			   'cyrillic-iso-8bit "cyrillic-yawerty"))
+			   "cyrillic-yawerty"))
 
 ;;;###autoload
 (defun setup-cyrillic-koi8-environment ()
   "Setup multilingual environment (MULE) for Cyrillic KOI8 users."
   (interactive)
-  (setup-8-bit-environment "Cyrillic-KOI8" 'cyrillic-iso8859-5 'cyrillic-koi8
+  (setup-8-bit-environment "Cyrillic-KOI8" 'cyrillic-iso8859-5
 			   "cyrillic-yawerty"))
 
 ;;;###autoload
 (defun setup-cyrillic-alternativnyj-environment ()
   "Setup multilingual environment (MULE) for Cyrillic ALTERNATIVNYJ users."
   (interactive)
-  (setup-8-bit-environment "Cyrillic" 'cyrillic-iso8859-5
-			   'cyrillic-alternativnyj "cyrillic-yawerty")
+  (setup-8-bit-environment "Cyrillic-ALT" 'cyrillic-iso8859-5
+			   "cyrillic-yawerty")
   (setq coding-category-raw-text 'cyrillic-alternativnyj))
 
 
diff -r 60bf060b9ab1 -r df8fab27273f lisp/language/devan-util.el
--- a/lisp/language/devan-util.el	Thu Jan 22 01:42:20 1998 +0000
+++ b/lisp/language/devan-util.el	Thu Jan 22 01:45:17 1998 +0000
@@ -48,8 +48,7 @@
 (defun setup-devanagari-environment ()
   "Setup multilingual environment (MULE) for languages using Devanagari."
   (interactive)
-  (setup-8-bit-environment "Devanagari" nil 'devanagari
-			   "devanagari-itrans"))
+  (setup-8-bit-environment "Devanagari" nil "devanagari-itrans"))
 
 ;;; Basic functions.
 
diff -r 60bf060b9ab1 -r df8fab27273f lisp/language/lao-util.el
--- a/lisp/language/lao-util.el	Thu Jan 22 01:42:20 1998 +0000
+++ b/lisp/language/lao-util.el	Thu Jan 22 01:45:17 1998 +0000
@@ -28,8 +28,7 @@
 (defun setup-lao-environment ()
   "Setup multilingual environment (MULE) for Lao."
   (interactive)
-  (setup-8-bit-environment "Lao" 'lao 'iso-2022-7bit
-			   "lao"))
+  (setup-8-bit-environment "Lao" 'lao "lao"))
 
 (let ((l '((?(1!(B consonant "LETTER KOR  KAI'" "CHICKEN")
 	   (?(1"(B consonant "LETTER KHOR KHAI'" "EGG")
diff -r 60bf060b9ab1 -r df8fab27273f lisp/language/thai-util.el
--- a/lisp/language/thai-util.el	Thu Jan 22 01:42:20 1998 +0000
+++ b/lisp/language/thai-util.el	Thu Jan 22 01:45:17 1998 +0000
@@ -28,8 +28,7 @@
 (defun setup-thai-environment ()
   "Setup multilingual environment (MULE) for Thai."
   (interactive)
-  (setup-8-bit-environment "Thai" 'thai-tis620 'thai-tis620
-			   "thai-kesmanee"))
+  (setup-8-bit-environment "Thai" 'thai-tis620 "thai-kesmanee"))
 
 ;; Setting information of Thai characters.