(setup-tibetan-environment): Set default-input-method correctly.

[gnu-emacs] / lisp / language / tibet-util.el

diff --git a/lisp/language/tibet-util.el b/lisp/language/tibet-util.el
index 96d63d37d8e07f4fb2f3b71e0621f40c7f166899..ab7561dc8b207b59a5337e5c8b54824ea114c66a 100644 (file)
--- a/lisp/language/tibet-util.el
+++ b/lisp/language/tibet-util.el
@@ -1,7 +1,7 @@
 ;;; tibet-util.el --- Support for inputting Tibetan characters
 
-;; Copyright (C) 1995 Free Software Foundation, Inc.
 ;; Copyright (C) 1995 Electrotechnical Laboratory, JAPAN.
+;; Licensed to the Free Software Foundation.
 
 ;; Keywords: multilingual, Tibetan
 
@@ -40,7 +40,7 @@
 
   (setq-default buffer-file-coding-system 'iso-2022-7)
 
-  (setq default-input-method '("Tibetan" . "quail-tibetan-wylie"))
+  (setq default-input-method  "quail-tibetan-wylie")
 
   (setq sendmail-coding-system 'iso-2022-7
        rmail-file-coding-system 'iso-2022-7))