summaryrefslogtreecommitdiff
path: root/lisp/mail/rmailout.el
diff options
context:
space:
mode:
authorRichard M. Stallman <rms@gnu.org>1992-06-11 20:40:37 +0000
committerRichard M. Stallman <rms@gnu.org>1992-06-11 20:40:37 +0000
commit4c6a33177edcb89a75fa25378d0c7054eb7fbfcb (patch)
tree4666facf90786d3df798c34243afc828067e5cf5 /lisp/mail/rmailout.el
parentfad160d5e1f2c6860c20857434869ffc3f31fd72 (diff)
downloademacs-4c6a33177edcb89a75fa25378d0c7054eb7fbfcb.tar.gz
*** empty log message ***
Diffstat (limited to 'lisp/mail/rmailout.el')
-rw-r--r--lisp/mail/rmailout.el2
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/mail/rmailout.el b/lisp/mail/rmailout.el
index 5606eccbe87..00dca6186a8 100644
--- a/lisp/mail/rmailout.el
+++ b/lisp/mail/rmailout.el
@@ -165,7 +165,7 @@ starting with the current one. Deleted messages are skipped and don't count."
(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.)