"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."
(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>