# HG changeset patch
# User Paul Eggert <eggert@twinsun.com>
# Date 940317629 0
# Node ID cc03e8352d4889b7c8cd7a3c720e60eb8569ad30
# Parent  2473e4ca59b34d87988c527f2592fa79fa6fd59e
* language/japan-util.el (setup-japanese-environment-internal):
Prefer japanese-iso-8bit if the system-type is usg-unix-v.

diff -r 2473e4ca59b3 -r cc03e8352d48 lisp/language/japan-util.el
--- a/lisp/language/japan-util.el	Tue Oct 19 07:20:09 1999 +0000
+++ b/lisp/language/japan-util.el	Tue Oct 19 07:20:29 1999 +0000
@@ -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 "\\|[。？！]")))