diff lisp/mail/rmailsum.el @ 37955:e1400bd914f0

(rmail-message-subject-p): Don't call `rmail-summary-line-decoder' if the message does not have Subject: field.

--- a/lisp/mail/rmailsum.el	Thu May 31 07:59:18 2001 +0000
+++ b/lisp/mail/rmailsum.el	Thu May 31 08:08:41 2001 +0000
@@ -138,8 +138,10 @@
      (progn (search-forward (if whole-message "\^_" "\n\n")) (point)))
     (goto-char (point-min))
     (if whole-message (re-search-forward subject nil t)
-      (string-match subject (or (funcall rmail-summary-line-decoder
-					 (mail-fetch-field "Subject")) "")) )))
+      (string-match subject (let ((subj (mail-fetch-field "Subject")))
+			      (if subj
+				  (funcall rmail-summary-line-decoder subj)
+				""))))))
 
 ;;;###autoload
 (defun rmail-summary-by-senders (senders)