Commit 877c525f authored by Eli Zaretskii's avatar Eli Zaretskii
Browse files

Include "Date:" in mail messages filed by 'sendmail-send-it'

* lisp/mail/sendmail.el (mail-do-fcc): Insert a 'Date:' header
into the filed message.  In the outgoing message, sendmail will
add the date, but the composed message body doesn't have it.
parent 5b9f08fb
......@@ -28,8 +28,8 @@
;;; Code:
(require 'mail-utils)
(require 'rfc2047)
(autoload 'message-make-date "message")
(defgroup sendmail nil
"Mail sending commands for Emacs."
......@@ -1409,6 +1409,7 @@ just append to the file, in Babyl format if necessary."
(require 'mail-utils)
(insert (mail-rfc822-time-zone time) " ")
(goto-char (point-max))
(insert "Date: " (message-make-date) "\n")
(insert-buffer-substring mailbuf)
;; Make sure messages are separated.
(goto-char (point-max))
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment