* language/japan-util.el (setup-japanese-environment-internal):

Prefer japanese-iso-8bit if the system-type is usg-unix-v.

diff --git a/lisp/language/japan-util.el b/lisp/language/japan-util.el
index 14932039e791111b574c0146b18935ebe0cfb2a4..58645ba6b11ff6c86a09f2dacaaa37eaed34582a 100644 (file)
--- a/lisp/language/japan-util.el
+++ b/lisp/language/japan-util.el
@@ -34,9 +34,10 @@
 
 ;;;###autoload
 (defun setup-japanese-environment-internal ()
-  (if (eq system-type 'ms-dos)
-      (prefer-coding-system 'japanese-shift-jis)
-    (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)
+        (prefer-coding-system 'japanese-iso-8bit)))
   (setq sentence-end-save sentence-end)
   (setq sentence-end (concat sentence-end "\\|[\e$B!#!)!*\e(B]")))