summaryrefslogtreecommitdiff
path: root/lisp/=gnusmail.el
diff options
context:
space:
mode:
authorRichard M. Stallman <rms@gnu.org>1994-07-05 21:02:48 +0000
committerRichard M. Stallman <rms@gnu.org>1994-07-05 21:02:48 +0000
commit7f0e68ac113508f66d18b126eb3a2becaedaeed7 (patch)
treea811d48430845262806f0e1ac34844161e38c535 /lisp/=gnusmail.el
parent2ca14123f6a94681e4e126b270fbb53bdfc2144b (diff)
downloademacs-7f0e68ac113508f66d18b126eb3a2becaedaeed7.tar.gz
(gnus-mail-reply-using-mhe): Handle case of no subject.
Diffstat (limited to 'lisp/=gnusmail.el')
-rw-r--r--lisp/=gnusmail.el3
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/=gnusmail.el b/lisp/=gnusmail.el
index bc906d5f29d..b8f62346565 100644
--- a/lisp/=gnusmail.el
+++ b/lisp/=gnusmail.el
@@ -152,7 +152,8 @@ The command \\[mh-yank-cur-msg] yank the original message into current buffer."
(save-restriction
(gnus-article-show-all-headers) ;I don't think this is really needed.
(setq from (gnus-fetch-field "from")
- subject (let ((subject (gnus-fetch-field "subject")))
+ subject (let ((subject (or (gnus-fetch-field "subject")
+ "(None)")))
(if (and subject
(not (string-match "^[Rr][Ee]:.+$" subject)))
(concat "Re: " subject) subject))