# HG changeset patch
# User Kenichi Handa <handa@m17n.org>
# Date 868954938 0
# Node ID 5b263fdf71a294c4253dc3395958d9785a4cc777
# Parent  ddf73154a296ae02b09e712c9a78c4564d255a16
(setup-japanese-environment): Adjusted for the change of coding
category names.  Set default-input-method correctly.

diff -r ddf73154a296 -r 5b263fdf71a2 lisp/language/japan-util.el
--- a/lisp/language/japan-util.el	Tue Jul 15 08:22:18 1997 +0000
+++ b/lisp/language/japan-util.el	Tue Jul 15 08:22:18 1997 +0000
@@ -36,7 +36,8 @@
      coding-category-iso-8-2
      coding-category-sjis
      coding-category-iso-8-1
-     coding-category-iso-else
+     coding-category-iso-7-else
+     coding-category-iso-8-else
      coding-category-emacs-mule))
 
   (if (eq system-type 'ms-dos)
@@ -50,7 +51,7 @@
     (set-terminal-coding-system-internal 'iso-2022-7bit)
     (set-keyboard-coding-system-internal 'iso-2022-7bit))
 
-  (setq default-input-method '("Japanese" . "quail-ja"))
+  (setq default-input-method "japanese")
 
   (setq sendmail-coding-system 'iso-2022-jp
 	rmail-file-coding-system 'iso-2022-jp)