X-Git-Url: http://git.chise.org/gitweb/?a=blobdiff_plain;f=lisp%2Fspam.el;h=483fef3f4505caa74e96443badb20ebf03f8a82b;hb=eefb23f742cf6a6dbbbcce540c509940296f971d;hp=cc139318a215276ec37c47bf6a6500257d7759bc;hpb=3fb2e00d019c5bf26c51fbb0ea63270809222ec2;p=elisp%2Fgnus.git-

diff --git a/lisp/spam.el b/lisp/spam.el
index cc13931..483fef3 100644
--- 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