Changes committed gnus/lisp (ChangeLog spam.el)

"Ted Zlatanov" <[email protected]> Mon, 14 Sep 2009 21:19:41 +0200
Newsgroups gmane.emacs.gnus.commits
Message-ID <[email protected]>
Modified: ChangeLog spam.el

(spam-unregister-on-reregister): Add boolean variable.
(spam-resolve-registrations-routine): Use it to unregister articles
that change status.


Index: ChangeLog
diff -u gnus/lisp/ChangeLog:7.2018 gnus/lisp/ChangeLog:7.2019
--- ChangeLog:7.2018	Mon Sep 14 01:31:56 2009
+++ ChangeLog	Mon Sep 14 21:19:41 2009
@@ -1,3 +1,9 @@
+2009-09-14  Adam Sjøgren  <[email protected]>
+
+	* spam.el (spam-unregister-on-reregister): Add boolean variable.
+	(spam-resolve-registrations-routine): Use it to unregister articles
+	that change status.
+
 2009-09-13  Katsumi Yamaoka  <[email protected]>
 
 	* parse-time.el (parse-time-syntax): Restore it to keep compatibility
Index: spam.el
diff -u gnus/lisp/spam.el:7.104 gnus/lisp/spam.el:7.105
--- spam.el:7.104	Wed Sep  9 11:31:35 2009
+++ spam.el	Mon Sep 14 21:19:41 2009
@@ -660,12 +660,12 @@
   :type 'string
   :group 'spam-crm114)
 
-(defcustom spam-crm114-spam-strong-switch "--UNKNOWN"
+(defcustom spam-crm114-spam-strong-switch "--unlearn"
   "The switch that CRM114 Mailfilter uses to unregister ham messages."
   :type 'string
   :group 'spam-crm114)
 
-(defcustom spam-crm114-ham-strong-switch "--UNKNOWN"
+(defcustom spam-crm114-ham-strong-switch "--unlearn"
   "The switch that CRM114 Mailfilter uses to unregister spam messages."
   :type 'string
   :group 'spam-crm114)
@@ -1152,10 +1152,8 @@
 				  'spam-check-crm114
 				  'spam-crm114-register-ham-routine
 				  'spam-crm114-register-spam-routine
-				  ;; does CRM114 Mailfilter support unregistration?
-				  nil
-				  nil)
-
+				  'spam-crm114-unregister-ham-routine
+				  'spam-crm114-unregister-spam-routine)
 ;;}}}
 
 ;;{{{ scoring and summary formatting