Mercurial > hg > xemacs-beta

diff lisp/gnus/gnus-nocem.el @ 100:4be1180a9e89 r20-1b2

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r20-1b2
author cvs
date Mon, 13 Aug 2007 09:15:11 +0200
parents 0d2f883870bc
children 360340f9fd5f
line wrap: on
line diff
--- a/lisp/gnus/gnus-nocem.el	Mon Aug 13 09:13:58 2007 +0200
+++ b/lisp/gnus/gnus-nocem.el	Mon Aug 13 09:15:11 2007 +0200
@@ -145,7 +145,9 @@
 		  ;; ignore scanning followups.
 		  (and (string-match "@@NCM" (mail-header-subject header))
 		       (or gnus-nocem-liberal-fetch
-			   (and (string= "" (mail-header-references header))
+			   (and (or (string= "" (mail-header-references
+						 header))
+				    (null (mail-header-references header)))
 				(not (member (mail-header-message-id header)
 					     gnus-nocem-seen-message-ids))))
 		       (gnus-nocem-check-article group header)))))))