diff options
| author | Miles Bader <miles@gnu.org> | 1996-07-04 05:45:33 +0000 |
|---|---|---|
| committer | Miles Bader <miles@gnu.org> | 1996-07-04 05:45:33 +0000 |
| commit | 284306c56ae5271be9a86137d2cc32a50a8ff668 (patch) | |
| tree | b94f5229665d1b5fe34c270e97c9af65a9c27d43 | |
| parent | a31bed322b7423c6338ae5212febbb6dbd2f4fbe (diff) | |
| download | emacs-284306c56ae5271be9a86137d2cc32a50a8ff668.tar.gz | |
(smtpmail-send-it): Ignore `To:' if there is a `Resent-to':.
| -rw-r--r-- | lisp/mail/smtpmail.el | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/mail/smtpmail.el b/lisp/mail/smtpmail.el index 801cac7fcb5..16123aede2b 100644 --- a/lisp/mail/smtpmail.el +++ b/lisp/mail/smtpmail.el @@ -197,7 +197,8 @@ don't define this value.") ;; (setq smtpmail-address-buffer (generate-new-buffer "*smtp-mail*")) (setq smtpmail-recipient-address-list - (smtpmail-deduce-address-list tembuf (point-min) delimline)) + (or resend-to-addresses + (smtpmail-deduce-address-list tembuf (point-min) delimline))) (kill-buffer smtpmail-address-buffer) (smtpmail-do-bcc delimline) |