changeset 19952:3e0041620fc2

Fix previous change.
author Richard M. Stallman <rms@gnu.org>
date Fri, 19 Sep 1997 04:27:56 +0000
parents 820fc18dd520
children 5a9f21b9c5b6
files lisp/mail/mh-comp.el
diffstat 1 files changed, 6 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/mail/mh-comp.el	Fri Sep 19 04:24:02 1997 +0000
+++ b/lisp/mail/mh-comp.el	Fri Sep 19 04:27:56 1997 +0000
@@ -26,7 +26,7 @@
 
 ;;; Change Log:
 
-;; $Id: mh-comp.el,v 1.10 1997/04/29 01:36:06 rms Exp rms $
+;; $Id: mh-comp.el,v 1.11 1997/09/15 19:45:16 rms Exp rms $
 
 ;;; Code:
 
@@ -868,7 +868,11 @@
 	(file-name buffer-file-name)
 	(config mh-previous-window-config)
 	(coding-system-for-write
-	 (if (local-variable-p 'buffer-file-coding-system)
+	 (if (and (local-variable-p 'buffer-file-coding-system)
+		  ;; We're not sure why, but buffer-file-coding-system
+		  ;; tends to get set to undecided-unix.
+		  (not (memq buffer-file-coding-system
+			     '(undecided undecided-unix undecided-dos))))
 	     buffer-file-coding-system
 	   (or sendmail-coding-system
 	       default-buffer-file-coding-system