Mercurial > emacs

changeset 713:9d04c281a9bd

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
*** empty log message ***
author Richard M. Stallman <rms@gnu.org>
date Thu, 11 Jun 1992 20:40:37 +0000
parents 16823e891d56
children d105ddc785b8
files lisp/mail/rmailout.el
diffstat 1 files changed, 1 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/mail/rmailout.el	Thu Jun 11 02:31:08 1992 +0000
+++ b/lisp/mail/rmailout.el	Thu Jun 11 20:40:37 1992 +0000
@@ -165,7 +165,7 @@
 					     (mail-fetch-field "really-from")
 					     (mail-fetch-field "sender")
 					     "unknown"))
-		" " (current-time-string) "\n")
+		" " (or (mail-fetch-field "date") (current-time-string)) "\n")
 	;; ``Quote'' "\nFrom " as "\n>From "
 	;;  (note that this isn't really quoting, as there is no requirement
 	;;   that "\n[>]+From " be quoted in the same transparent way.)