Mercurial > emacs

changeset 8150:1b4a4f7a6dcb

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(gnus-mail-reply-using-mhe): Handle case of no subject.
author Richard M. Stallman <rms@gnu.org>
date Tue, 05 Jul 1994 21:02:48 +0000
parents 5e27997957db
children 2ac4479dd0ff
files lisp/=gnusmail.el
diffstat 1 files changed, 2 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/=gnusmail.el	Tue Jul 05 20:28:33 1994 +0000
+++ b/lisp/=gnusmail.el	Tue Jul 05 21:02:48 1994 +0000
@@ -152,7 +152,8 @@
     (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))