From: Kenichi Handa <handa@m17n.org>
Date: Sat, 16 Aug 1997 01:55:27 +0000 (+0000)
Subject: (setup-japanese-environment):  Delete
X-Git-Tag: emacs-20.1~580
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=a5aab75c8499e24a93ab5f9814a8a0ab8966584d;p=emacs.git

(setup-japanese-environment):  Delete
a code setting default value of default-input-method.
---

diff --git a/lisp/language/japan-util.el b/lisp/language/japan-util.el
index 2236428f242..c6c31fa4dec 100644
--- a/lisp/language/japan-util.el
+++ b/lisp/language/japan-util.el
@@ -46,10 +46,7 @@
        'japanese-shift-jis
      'iso-2022-7bit))
 
-  (setq default-input-method "japanese")
-  (setq-default default-input-method "japanese")
-
-  )
+  (setq default-input-method "japanese"))
 
 (defconst japanese-kana-table
   '((?$B$"(B ?$B%"(B ?(I1(B) (?$B$$(B ?$B%$(B ?(I2(B) (?$B$&(B ?$B%&(B ?(I3(B) (?$B$((B ?$B%((B ?(I4(B) (?$B$*(B ?$B%*(B ?(I5(B)