Synch to Gnus 200312100048.

[elisp/gnus.git-] / lisp / spam.el

diff --git a/lisp/spam.el b/lisp/spam.el
index cc13931..483fef3 100644 (file)
--- a/lisp/spam.el
+++ b/lisp/spam.el
@@ -371,7 +371,7 @@ your main source of newsgroup names."
   :type '(choice (directory 
                  :tag "Location of the Bogofilter database directory")
                 (const :tag "Use the default"))
-  :group 'spam-ifile)
+  :group 'spam-bogofilter)
 
 (defgroup spam-spamoracle nil
   "Spam spamoracle configuration."
@@ -1536,8 +1536,8 @@ REMOVE not nil, remove the ADDRESSES."
                 (point-min) (point-max) 
                 spam-bogofilter-path
                 nil temp-buffer-name nil
-                (if db `("-d" ,db "-v") `("-v")))
-         (setq return (spam-check-bogofilter-headers score)))))
+                (if db `("-d" ,db "-v") `("-v"))))
+       (setq return (spam-check-bogofilter-headers score))))
     return))
 
 (defun spam-bogofilter-register-with-bogofilter (articles