(rmail-spam-filter): Let-bind message-spam-status.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 6c23b21..11ce430 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,5 +1,8 @@
 2008-02-14  Glenn Morris  <rgm@gnu.org>
 
+       * mail/rmail-spam-filter.el (rmail-spam-filter): Let-bind
+       message-spam-status.
+
        * mail/smtpmail.el (password-cache-add): Declare as function.
 
 2008-02-14  Justus Piater <Justus-bulk@Piater.name>  (tiny change)

diff --git a/lisp/mail/rmail-spam-filter.el b/lisp/mail/rmail-spam-filter.el
index 8cc2e04..339abbe 100644 (file)
--- a/lisp/mail/rmail-spam-filter.el
+++ b/lisp/mail/rmail-spam-filter.el
@@ -256,6 +256,7 @@ it from rmail file.  Called for each new message retrieved by
        (message-recipients)
        (message-subject)
        (message-content-type)
+       (message-spam-status)
        (num-spam-definition-elements)
        (num-element 0)
        (exit-while-loop nil)