diff options
| author | Kenichi Handa <handa@m17n.org> | 2006-11-08 07:34:24 +0000 |
|---|---|---|
| committer | Kenichi Handa <handa@m17n.org> | 2006-11-08 07:34:24 +0000 |
| commit | b2020e89330a16f31d1123e6dc4df26af0e830a8 (patch) | |
| tree | 18d8850a6103be1677511fc7ceb0fa45023c29b9 /lisp/international | |
| parent | d5abc12cc225c78407a251152dbd9d20338bb94d (diff) | |
| download | emacs-b2020e89330a16f31d1123e6dc4df26af0e830a8.tar.gz | |
(set-default-coding-systems): Always
set default-file-name-coding-system to utf-8 for Mac Darwin.
Diffstat (limited to 'lisp/international')
| -rw-r--r-- | lisp/international/mule-cmds.el | 10 |
1 files changed, 6 insertions, 4 deletions
diff --git a/lisp/international/mule-cmds.el b/lisp/international/mule-cmds.el index 6edc0a4daac..fc461bffe2c 100644 --- a/lisp/international/mule-cmds.el +++ b/lisp/international/mule-cmds.el @@ -337,11 +337,13 @@ This also sets the following values: (or (local-variable-p 'buffer-file-coding-system buffer) (ucs-set-table-for-input buffer)))) - (if (and default-enable-multibyte-characters (not (eq system-type 'darwin)) - (or (not coding-system) - (not (coding-system-get coding-system 'ascii-incompatible)))) + (if (eq system-type 'darwin) ;; The file-name coding system on Darwin systems is always utf-8. - (setq default-file-name-coding-system coding-system)) + (setq default-file-name-coding-system 'utf-8) + (if (and default-enable-multibyte-characters + (or (not coding-system) + (not (coding-system-get coding-system 'ascii-incompatible)))) + (setq default-file-name-coding-system coding-system))) ;; If coding-system is nil, honor that on MS-DOS as well, so ;; that they could reset the terminal coding system. (unless (and (eq window-system 'pc) coding-system) |