From: Kenichi Handa <handa@m17n.org>
Date: Fri, 25 Jul 1997 07:44:24 +0000 (+0000)
Subject: (setup-tibetan-environment): Correct
X-Git-Tag: emacs-20.1~975
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=94154c84d495bc4e80aacaf0ec017d5dd172d1d0;p=emacs.git

(setup-tibetan-environment): Correct
coding system names.  Set default-input-method to "tibetan-wylie".
---

diff --git a/lisp/language/tibet-util.el b/lisp/language/tibet-util.el
index ab7561dc8b2..c832a424ba7 100644
--- a/lisp/language/tibet-util.el
+++ b/lisp/language/tibet-util.el
@@ -38,12 +38,12 @@
   (setup-english-environment)
   (setq coding-category-iso-8-2 'tibetan)
 
-  (setq-default buffer-file-coding-system 'iso-2022-7)
+  (setq-default buffer-file-coding-system 'iso-2022-7bit)
 
-  (setq default-input-method  "quail-tibetan-wylie")
+  (setq default-input-method  "tibetan-wylie")
 
-  (setq sendmail-coding-system 'iso-2022-7
-	rmail-file-coding-system 'iso-2022-7))
+  (setq sendmail-coding-system 'iso-2022-7bit
+	rmail-file-coding-system 'iso-2022-7bit))
 
 ;;; This function makes a transcription string for
 ;;; re-composing a character.