# HG changeset patch # User Kenichi Handa # Date 1048905292 0 # Node ID 04c0558bea4f697cfe12720b4f0fc7d7dac6989e # Parent 60da21fd968b85fdd23f1d0101f69fc56e675d0f If system-type is not for Windows, prefer japanese-iso-8bit. diff -r 60da21fd968b -r 04c0558bea4f lisp/language/japan-util.el --- a/lisp/language/japan-util.el Fri Mar 28 20:33:01 2003 +0000 +++ b/lisp/language/japan-util.el Sat Mar 29 02:34:52 2003 +0000 @@ -31,9 +31,9 @@ (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) (if (memq system-type '(windows-nt ms-dos cygwin)) - (prefer-coding-system 'japanese-shift-jis))) + (prefer-coding-system 'japanese-shift-jis) + (prefer-coding-system 'japanese-iso-8bit))) (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)