diff options
| -rw-r--r-- | lisp/mail/rmailout.el | 2 |
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.) |