diff options
| author | Lars Magne Ingebrigtsen | 1996-08-30 00:27:46 +0000 |
|---|---|---|
| committer | Lars Magne Ingebrigtsen | 1996-08-30 00:27:46 +0000 |
| commit | cba446ddefd98fbe9f72b48dd33d38daafb68402 (patch) | |
| tree | af5eeee47ee24f82006ae9f1837810f7380ee728 | |
| parent | 59860a8c8cc1dff71db1d3c730a2bf77728a4a2e (diff) | |
| download | emacs-cba446ddefd98fbe9f72b48dd33d38daafb68402.tar.gz emacs-cba446ddefd98fbe9f72b48dd33d38daafb68402.zip | |
1996-08-29 Lars Magne Ingebrigtsen <larsi@ifi.uio.no>
* message.el (message-do-fcc): Supply the FROM-GNUS parameter to
`rmail-output'.
| -rw-r--r-- | lisp/message.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/message.el b/lisp/message.el index 30e6d698f7b..ec0453dfb7d 100644 --- a/lisp/message.el +++ b/lisp/message.el | |||
| @@ -1790,7 +1790,7 @@ the user from the mailer." | |||
| 1790 | (not (eq message-fcc-handler-function 'rmail-output))) | 1790 | (not (eq message-fcc-handler-function 'rmail-output))) |
| 1791 | (funcall message-fcc-handler-function file) | 1791 | (funcall message-fcc-handler-function file) |
| 1792 | (if (and (file-readable-p file) (mail-file-babyl-p file)) | 1792 | (if (and (file-readable-p file) (mail-file-babyl-p file)) |
| 1793 | (rmail-output file 1) | 1793 | (rmail-output file 1 nil t) |
| 1794 | (let ((mail-use-rfc822 t)) | 1794 | (let ((mail-use-rfc822 t)) |
| 1795 | (rmail-output file 1 t t)))))) | 1795 | (rmail-output file 1 t t)))))) |
| 1796 | (kill-buffer (current-buffer))))) | 1796 | (kill-buffer (current-buffer))))) |