Re: Splitting on mail contents? (using spam-stat.el)

[Alex Schroeder <alex@emacswiki.org>]

Kai.Grossjohann@CS.Uni-Dortmund.DE (Kai Großjohann) writes:

>> I see that spam-stat-split-fancy uses gnus-original-article-buffer.
>> Does nnmail-split-fancy perhaps store the article in this buffer when
>> splitting?  I'll have to investigate that.
>
> Well, I remember that Gnus uses two different buffers for splitting
> and for `B r'.  Beware!

Yeah, I am still trying to find a bug in my code that sends about 1%
of all mail into the bogus group.  The problem is that I cannot debug
this (because it only happens in 1% of the cases, and errors are
probably caught using condition-case).  Just today I switched to the
following definition, hoping to finally find the bug. 

(defun spam-stat-split-fancy ()
  "Return the name of the spam group if the current mail is spam.
Use this function on `nnmail-split-fancy'.  If you are interested in
the raw data used for the last run of `spam-stat-score-buffer',
check the variable `spam-stat-score-data'."
  (condition-case var
      (save-excursion
	(set-buffer (if (boundp 'gnus-original-article-buffer)
			gnus-original-article-buffer
		      (message "Original article buffer not found.")
		      (current-buffer)))
	(goto-char (point-min))
	(if (> (spam-stat-score-buffer) 0.9)
	    (progn
	      (message "Spam-stat says this is spam!")
	      spam-stat-split-fancy-spam-group)
	  (message "Spam-stat says this is no spam.")))
    (error (message "Spam-stat found an error: %S" var))))

Alex.