# HG changeset patch # User Richard M. Stallman # Date 874643276 0 # Node ID 3e0041620fc20ff0eab4999df89e3bc3f270e191 # Parent 820fc18dd5200191c6604b2238bdb266bd9408b0 Fix previous change. diff -r 820fc18dd520 -r 3e0041620fc2 lisp/mail/mh-comp.el --- 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