Re: Spam does not move

["Ted Zlatanov" <tzz@lifelogs.com>]

On Sun, 27 Jun 2004, khosoda@venus.dti.ne.jp wrote:

> Ted> (debug (spam-list-articles gnus-newsgroup-articles 'spam))

> Debugger entered: nil

This means that no spam-marked articles were found.  I have been
unable to duplicate this error.  Here's the spam-list-articles
function from spam.el:

(defun spam-list-articles (articles classification)
  (let ((mark-check (if (eq classification 'spam)
			'spam-group-spam-mark-p
		      'spam-group-ham-mark-p))
	alist mark-cache-yes mark-cache-no)
    (dolist (article articles)
      (let ((mark (gnus-summary-article-mark article)))
	(unless (or (memq mark mark-cache-yes)
		    (memq mark mark-cache-no))
	  (if (funcall mark-check
		       gnus-newsgroup-name
		       mark)
	      (push mark mark-cache-yes)
	    (push mark mark-cache-no)))
	(when (memq mark mark-cache-yes)
	  (push article alist))))
    alist))

It does some caching to avoid calling spam-group-spam-mark-p, but I'm
pretty sure there's no bugs there.  In any case, I need you to:

- determine the article number that's marked as spam, e.g. 5644

- do M-: (gnus-summary-article-mark 5644)

- do M-: (spam-group-spam-mark-p GROUP MARK)
  where GROUP is the group name, usually in gnus-newsgroup-name, and
  MARK is what gnus-summary-article-mark returned.

- send all this information to me.

I have the feeling you've somehow removed the spam-mark from the list
of spam-marks for your ham group.  I don't know what else the problem
could be.

Ted