+2004-05-14 Teodor Zlatanov <tzz@lifelogs.com>
+
+ * spam.el (spam-summary-prepare-exit): only produce "marking spam
+ as expired without moving it" message when there are spam
+ messages left
+
2004-05-14 Kai Grossjohann <kgrossjo@eu.uu.net>
* nntp.el (nntp-request-set-mark, nntp-request-update-info): Call
;; now we redo spam-mark-spam-as-expired-and-move-routine to only
;; expire spam, in case the above did not expire them
- (gnus-message 6 "Marking spam as expired without moving it")
- (spam-mark-spam-as-expired-and-move-routine nil)
+ (when (< 0 (spam-list-articles
+ gnus-newsgroup-articles
+ 'spam))
+ (gnus-message 6 "Marking spam as expired without moving it")
+ (spam-mark-spam-as-expired-and-move-routine nil))
(when (or (spam-group-ham-contents-p gnus-newsgroup-name)
(and (spam-group-spam-contents-p gnus-newsgroup-name)