(gnus-mail-reply-using-mhe): Handle case of no subject.

ba9f6413 · Richard M. Stallman · 69718e9d · ba9f6413
Commit ba9f6413 authored Jul 05, 1994 by Richard M. Stallman
Hide whitespace changes
Inline Side-by-side

Showing with 2 additions and 1 deletion

lisp/gnusmail.el lisp/gnusmail.el +2 -1

No files found.
--- 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))