summaryrefslogtreecommitdiff
path: root/lisp/mail/rmail.el
diff options
context:
space:
mode:
Diffstat (limited to 'lisp/mail/rmail.el')
-rw-r--r--lisp/mail/rmail.el8
1 files changed, 4 insertions, 4 deletions
diff --git a/lisp/mail/rmail.el b/lisp/mail/rmail.el
index b496102a57a..7d6e0490d97 100644
--- a/lisp/mail/rmail.el
+++ b/lisp/mail/rmail.el
@@ -1740,11 +1740,11 @@ use \\[mail-yank-original] to yank the original message into it."
subject (or (and resent-reply-to
(mail-fetch-field "resent-subject" t))
(mail-fetch-field "subject"))
- date (cond (resent-reply-to
- (mail-fetch-field "resent-date" t))
- ((mail-fetch-field "date")))
+ date (or (and resent-reply-to
+ (mail-fetch-field "resent-date" t))
+ (mail-fetch-field "date"))
to (cond (resent-reply-to
- (mail-fetch-field "resent-to" t))
+ (or (mail-fetch-field "resent-to" t)) "")
((mail-fetch-field "to" nil t))
;((mail-fetch-field "apparently-to")) ack gag barf
(t ""))