From: Kenichi Handa <handa@m17n.org>
Date: Wed, 12 Mar 2003 07:23:51 +0000 (+0000)
Subject: (setup-japanese-environment-internal):
X-Git-Tag: ttn-vms-21-2-B4~10942
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=9a05d1faa9ac2e631d1042de5ce0a4c23b583c7f;p=emacs.git

(setup-japanese-environment-internal):
By defalt, use japanese-iso-8bit for file names.
---

diff --git a/lisp/language/japan-util.el b/lisp/language/japan-util.el
index b84e003cfe1..7641593440c 100644
--- a/lisp/language/japan-util.el
+++ b/lisp/language/japan-util.el
@@ -29,6 +29,9 @@
 
 ;;;###autoload
 (defun setup-japanese-environment-internal ()
+  ;; By default, we use 'japanese-iso-8bit for file names.  But, the
+  ;; following prefer-coding-system will override it.
+  (setq default-file-name-coding-system 'japanese-iso-8bit)
   (cond ((eq system-type 'ms-dos)
 	 (prefer-coding-system 'japanese-shift-jis))
 	((eq system-type 'usg-unix-v)