comparison lisp/gnus/gnus-nocem.el @ 24:4103f0995bd7 r19-15b95

Import from CVS: tag r19-15b95
author cvs
date Mon, 13 Aug 2007 08:51:03 +0200
parents 0293115a14e9
children ec9a17fef872
comparison
equal deleted inserted replaced
23:0edd3412f124 24:4103f0995bd7
143 ;; this cross posted message. Nocem messages 143 ;; this cross posted message. Nocem messages
144 ;; are not allowed to have references, so we can 144 ;; are not allowed to have references, so we can
145 ;; ignore scanning followups. 145 ;; ignore scanning followups.
146 (and (string-match "@@NCM" (mail-header-subject header)) 146 (and (string-match "@@NCM" (mail-header-subject header))
147 (or gnus-nocem-liberal-fetch 147 (or gnus-nocem-liberal-fetch
148 (and (string= "" (mail-header-references header)) 148 (and (or (string= "" (mail-header-references
149 header))
150 (null (mail-header-references header)))
149 (not (member (mail-header-message-id header) 151 (not (member (mail-header-message-id header)
150 gnus-nocem-seen-message-ids)))) 152 gnus-nocem-seen-message-ids))))
151 (gnus-nocem-check-article group header))))))) 153 (gnus-nocem-check-article group header)))))))
152 (setq gnus-nocem-active 154 (setq gnus-nocem-active
153 (cons (list group gactive) 155 (cons (list group gactive)