Mercurial > emacs

diff lisp/gnus/mm-util.el @ 88660:e532f53e6da0

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(mm-auto-save-coding-system): Prefer utf-8-emacs coding system to emacs-mule.
author Dave Love <fx@gnu.org>
date Mon, 27 May 2002 14:53:41 +0000
parents 5f1dd0f5e06c
children 3e2e82acc047
line wrap: on
line diff
--- a/lisp/gnus/mm-util.el	Mon May 27 14:52:46 2002 +0000
+++ b/lisp/gnus/mm-util.el	Mon May 27 14:53:41 2002 +0000
@@ -155,6 +155,11 @@
 
 (defvar mm-auto-save-coding-system
   (cond
+   ((mm-coding-system-p 'utf-8-emacs)
+    (if (memq system-type '(windows-nt ms-dos ms-windows))
+	(if (mm-coding-system-p 'utf-8-emacs-dos)
+	    'utf-8-emacs-dos mm-binary-coding-system)
+      'utf-8-emacs))
    ((mm-coding-system-p 'emacs-mule)
     (if (memq system-type '(windows-nt ms-dos ms-windows))
 	(if (mm-coding-system-p 'emacs-mule-dos)