diff options
| -rw-r--r-- | lisp/mail/rmail.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/mail/rmail.el b/lisp/mail/rmail.el index 5bffa4ef60d..ad99396a45c 100644 --- a/lisp/mail/rmail.el +++ b/lisp/mail/rmail.el | |||
| @@ -1839,7 +1839,7 @@ typically for purposes of moderating a list." | |||
| 1839 | (goto-char (point-min)) | 1839 | (goto-char (point-min)) |
| 1840 | ;;>> Insert resent-from: | 1840 | ;;>> Insert resent-from: |
| 1841 | (insert "Resent-From: " from "\n") | 1841 | (insert "Resent-From: " from "\n") |
| 1842 | (insert "Resent-Date: " (current-time-string) "\n") | 1842 | (insert "Resent-Date: " (mail-rfc822-date) "\n") |
| 1843 | ;;>> Insert resent-to: and bcc if need be. | 1843 | ;;>> Insert resent-to: and bcc if need be. |
| 1844 | (let ((before (point))) | 1844 | (let ((before (point))) |
| 1845 | (insert "Resent-To: " (if (stringp address) | 1845 | (insert "Resent-To: " (if (stringp address) |