1
0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2025-01-01 11:14:55 +00:00

Remember: Write mbox in a way that works better with Mutt.

This commit is contained in:
Michael Olson 2008-03-24 02:53:05 +00:00
parent 8e8b72c9fe
commit b152c5d366

View File

@ -329,7 +329,7 @@ With a prefix or a visible region, use the region as INITIAL."
"Return a simple date. Nothing fancy."
(if rfc822-p
(format-time-string "%a, %e %b %Y %T %z" (current-time))
(format-time-string "%c" (current-time))))
(format-time-string "%a %b %e %T %Y" (current-time))))
(defun remember-buffer-desc ()
"Using the first line of the current buffer, create a short description."
@ -364,8 +364,7 @@ field, for the purpose of appropriate splitting."
(desc (remember-buffer-desc))
(text (buffer-string)))
(with-temp-buffer
(insert (format "
From %s %s
(insert (format "From %s %s
Date: %s
From: %s
Message-Id: <remember-%s@%s>