diff options
| author | Dave Love | 2002-05-27 14:53:41 +0000 |
|---|---|---|
| committer | Dave Love | 2002-05-27 14:53:41 +0000 |
| commit | 8bebeb10c59b47d3e96ecc9fa462c5dd1d6ae3a2 (patch) | |
| tree | 8c891d74db4567c6cf20a35c4dcae3e2cb06a7b0 | |
| parent | eca8bedbdeea42ce10f3f54b91dfcc6de04a54f0 (diff) | |
| download | emacs-8bebeb10c59b47d3e96ecc9fa462c5dd1d6ae3a2.tar.gz emacs-8bebeb10c59b47d3e96ecc9fa462c5dd1d6ae3a2.zip | |
(mm-auto-save-coding-system): Prefer utf-8-emacs
coding system to emacs-mule.
| -rw-r--r-- | lisp/gnus/mm-util.el | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/lisp/gnus/mm-util.el b/lisp/gnus/mm-util.el index 385d09f09e7..f63829eaba8 100644 --- a/lisp/gnus/mm-util.el +++ b/lisp/gnus/mm-util.el | |||
| @@ -155,6 +155,11 @@ | |||
| 155 | 155 | ||
| 156 | (defvar mm-auto-save-coding-system | 156 | (defvar mm-auto-save-coding-system |
| 157 | (cond | 157 | (cond |
| 158 | ((mm-coding-system-p 'utf-8-emacs) | ||
| 159 | (if (memq system-type '(windows-nt ms-dos ms-windows)) | ||
| 160 | (if (mm-coding-system-p 'utf-8-emacs-dos) | ||
| 161 | 'utf-8-emacs-dos mm-binary-coding-system) | ||
| 162 | 'utf-8-emacs)) | ||
| 158 | ((mm-coding-system-p 'emacs-mule) | 163 | ((mm-coding-system-p 'emacs-mule) |
| 159 | (if (memq system-type '(windows-nt ms-dos ms-windows)) | 164 | (if (memq system-type '(windows-nt ms-dos ms-windows)) |
| 160 | (if (mm-coding-system-p 'emacs-mule-dos) | 165 | (if (mm-coding-system-p 'emacs-mule-dos) |