Mercurial > emacs

diff lisp/=gnusmail.el @ 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 eaaf6c8933b2
children 5f69627d9466
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))