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." | |||
| 165 | (mail-fetch-field "really-from") | 165 | (mail-fetch-field "really-from") |
| 166 | (mail-fetch-field "sender") | 166 | (mail-fetch-field "sender") |
| 167 | "unknown")) | 167 | "unknown")) |
| 168 | " " (current-time-string) "\n") | 168 | " " (or (mail-fetch-field "date") (current-time-string)) "\n") |
| 169 | ;; ``Quote'' "\nFrom " as "\n>From " | 169 | ;; ``Quote'' "\nFrom " as "\n>From " |
| 170 | ;; (note that this isn't really quoting, as there is no requirement | 170 | ;; (note that this isn't really quoting, as there is no requirement |
| 171 | ;; that "\n[>]+From " be quoted in the same transparent way.) | 171 | ;; that "\n[>]+From " be quoted in the same transparent way.) |