diff options
| author | Richard M. Stallman | 1997-09-19 04:27:56 +0000 |
|---|---|---|
| committer | Richard M. Stallman | 1997-09-19 04:27:56 +0000 |
| commit | 03d9b139a3d8cfd20997b01d6f03fe197f709f70 (patch) | |
| tree | f50d45f5aa967a1295b14086d4f7410cd37b98b4 | |
| parent | 959096f8ec4374f0fb1f6524df2b50fe6b571288 (diff) | |
| download | emacs-03d9b139a3d8cfd20997b01d6f03fe197f709f70.tar.gz emacs-03d9b139a3d8cfd20997b01d6f03fe197f709f70.zip | |
Fix previous change.
| -rw-r--r-- | lisp/mail/mh-comp.el | 8 |
1 files changed, 6 insertions, 2 deletions
diff --git a/lisp/mail/mh-comp.el b/lisp/mail/mh-comp.el index 9345575158f..fcf5a64d0ba 100644 --- a/lisp/mail/mh-comp.el +++ b/lisp/mail/mh-comp.el | |||
| @@ -26,7 +26,7 @@ | |||
| 26 | 26 | ||
| 27 | ;;; Change Log: | 27 | ;;; Change Log: |
| 28 | 28 | ||
| 29 | ;; $Id: mh-comp.el,v 1.10 1997/04/29 01:36:06 rms Exp rms $ | 29 | ;; $Id: mh-comp.el,v 1.11 1997/09/15 19:45:16 rms Exp rms $ |
| 30 | 30 | ||
| 31 | ;;; Code: | 31 | ;;; Code: |
| 32 | 32 | ||
| @@ -868,7 +868,11 @@ Run `mh-before-send-letter-hook' before actually doing anything." | |||
| 868 | (file-name buffer-file-name) | 868 | (file-name buffer-file-name) |
| 869 | (config mh-previous-window-config) | 869 | (config mh-previous-window-config) |
| 870 | (coding-system-for-write | 870 | (coding-system-for-write |
| 871 | (if (local-variable-p 'buffer-file-coding-system) | 871 | (if (and (local-variable-p 'buffer-file-coding-system) |
| 872 | ;; We're not sure why, but buffer-file-coding-system | ||
| 873 | ;; tends to get set to undecided-unix. | ||
| 874 | (not (memq buffer-file-coding-system | ||
| 875 | '(undecided undecided-unix undecided-dos)))) | ||
| 872 | buffer-file-coding-system | 876 | buffer-file-coding-system |
| 873 | (or sendmail-coding-system | 877 | (or sendmail-coding-system |
| 874 | default-buffer-file-coding-system | 878 | default-buffer-file-coding-system |