diff options
| author | Kenichi Handa | 2006-11-08 07:34:24 +0000 |
|---|---|---|
| committer | Kenichi Handa | 2006-11-08 07:34:24 +0000 |
| commit | b2020e89330a16f31d1123e6dc4df26af0e830a8 (patch) | |
| tree | 18d8850a6103be1677511fc7ceb0fa45023c29b9 | |
| parent | d5abc12cc225c78407a251152dbd9d20338bb94d (diff) | |
| download | emacs-b2020e89330a16f31d1123e6dc4df26af0e830a8.tar.gz emacs-b2020e89330a16f31d1123e6dc4df26af0e830a8.zip | |
(set-default-coding-systems): Always
set default-file-name-coding-system to utf-8 for Mac Darwin.
| -rw-r--r-- | lisp/ChangeLog | 5 | ||||
| -rw-r--r-- | lisp/international/mule-cmds.el | 10 |
2 files changed, 11 insertions, 4 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index de966981171..d530721d9ce 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog | |||
| @@ -1,3 +1,8 @@ | |||
| 1 | 2006-11-08 Kenichi Handa <handa@m17n.org> | ||
| 2 | |||
| 3 | * international/mule-cmds.el (set-default-coding-systems): Always | ||
| 4 | set default-file-name-coding-system to utf-8 for Mac Darwin. | ||
| 5 | |||
| 1 | 2006-11-08 Juanma Barranquero <lekktu@gmail.com> | 6 | 2006-11-08 Juanma Barranquero <lekktu@gmail.com> |
| 2 | 7 | ||
| 3 | * makefile.w32-in (setwins): Remove. | 8 | * makefile.w32-in (setwins): Remove. |
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: | |||
| 337 | (or (local-variable-p 'buffer-file-coding-system buffer) | 337 | (or (local-variable-p 'buffer-file-coding-system buffer) |
| 338 | (ucs-set-table-for-input buffer)))) | 338 | (ucs-set-table-for-input buffer)))) |
| 339 | 339 | ||
| 340 | (if (and default-enable-multibyte-characters (not (eq system-type 'darwin)) | 340 | (if (eq system-type 'darwin) |
| 341 | (or (not coding-system) | ||
| 342 | (not (coding-system-get coding-system 'ascii-incompatible)))) | ||
| 343 | ;; The file-name coding system on Darwin systems is always utf-8. | 341 | ;; The file-name coding system on Darwin systems is always utf-8. |
| 344 | (setq default-file-name-coding-system coding-system)) | 342 | (setq default-file-name-coding-system 'utf-8) |
| 343 | (if (and default-enable-multibyte-characters | ||
| 344 | (or (not coding-system) | ||
| 345 | (not (coding-system-get coding-system 'ascii-incompatible)))) | ||
| 346 | (setq default-file-name-coding-system coding-system))) | ||
| 345 | ;; If coding-system is nil, honor that on MS-DOS as well, so | 347 | ;; If coding-system is nil, honor that on MS-DOS as well, so |
| 346 | ;; that they could reset the terminal coding system. | 348 | ;; that they could reset the terminal coding system. |
| 347 | (unless (and (eq window-system 'pc) coding-system) | 349 | (unless (and (eq window-system 'pc) coding-system) |