(set-default-coding-systems):

In --unibyte mode, don't set default-file-name-coding-system.

diff --git a/lisp/international/mule-cmds.el b/lisp/international/mule-cmds.el
index 4b041e75d5ae0ad0c4969b0f89de772ab1798016..bfa6f3b0fe73574c2ca2ac5bc1f784efea0abccd 100644 (file)
--- a/lisp/international/mule-cmds.el
+++ b/lisp/international/mule-cmds.el
@@ -204,7 +204,8 @@ This also sets the following values:
   o default value for the command `set-keyboard-coding-system'"
   (check-coding-system coding-system)
   (setq-default buffer-file-coding-system coding-system)
-  (setq default-file-name-coding-system coding-system)
+  (if default-enable-multibyte-characters
+      (setq default-file-name-coding-system coding-system))
   (setq default-terminal-coding-system coding-system)
   (setq default-keyboard-coding-system coding-system)
   (setq default-process-coding-system (cons coding-system coding-system)))