add spam-stat-load to gnus-get-new-news-hook

(spam-split): remove spam-stat-load call

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index d508250..290651b 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2003-02-26  Teodor Zlatanov  <tzz@lifelogs.com>
+
+       * spam.el: add spam-stat-load to gnus-get-new-news-hook
+       (spam-split): remove spam-stat-load call
+
 2003-02-26  Simon Josefsson  <jas@extundo.com>
 
        * gnus-sum.el (gnus-summary-toggle-header): Run

diff --git a/lisp/spam.el b/lisp/spam.el
index e259933..aa46c67 100644 (file)
--- a/lisp/spam.el
+++ b/lisp/spam.el
@@ -570,9 +570,6 @@ example like this: (: spam-split)
 See the Info node `(gnus)Fancy Mail Splitting' for more details."
   (interactive)
   
-  ;; load the spam-stat tables if needed
-  (when spam-use-stat (spam-stat-load))
-
   (let ((list-of-checks spam-list-of-checks)
        decision)
     (while (and list-of-checks (not decision))
@@ -792,8 +789,10 @@ Uses `gnus-newsgroup-name' if category is nil (for ham registration)."
               (insert article-string)
               (spam-stat-buffer-is-non-spam))))))
 
+      ;; Add hooks for loading and saving the spam stats
       (when spam-use-stat
-       (add-hook 'gnus-save-newsrc-hook 'spam-stat-save)))
+       (add-hook 'gnus-save-newsrc-hook 'spam-stat-save)
+       (add-hook 'gnus-get-new-news-hook 'spam-stat-load)))
 
   (file-error (progn
                (defalias 'spam-stat-register-ham-routine 'ignore)