From b0d40e502123325977148212340c4281eadd959e Mon Sep 17 00:00:00 2001 From: hmurata Date: Sat, 24 Jan 2004 08:52:25 +0000 Subject: [PATCH] * elsp-bogofilter.el (elmo-spam-bogofilter-arguments-alist): Follow the options change of latest bogofilter. --- elmo/ChangeLog | 3 +++ elmo/elsp-bogofilter.el | 6 ++---- 2 files changed, 5 insertions(+), 4 deletions(-) diff --git a/elmo/ChangeLog b/elmo/ChangeLog index 4aacb66..48df703 100644 --- a/elmo/ChangeLog +++ b/elmo/ChangeLog @@ -1,5 +1,8 @@ 2004-01-24 Hiroya Murata + * elsp-bogofilter.el (elmo-spam-bogofilter-arguments-alist): + Follow the options change of latest bogofilter. + * elsp-bogofilter.el (elmo-spam-bogofilter-spam-switch): Abolish. (elmo-spam-bogofilter-good-switch): Ditto. (elmo-spam-bogofilter-arguments-alist): New user option. diff --git a/elmo/elsp-bogofilter.el b/elmo/elsp-bogofilter.el index 08de763..7000307 100644 --- a/elmo/elsp-bogofilter.el +++ b/elmo/elsp-bogofilter.el @@ -53,12 +53,10 @@ :group 'elmo-spam-bogofilter) (defcustom elmo-spam-bogofilter-arguments-alist - '((classify . ("-v" "-2" - (if register "-u") + '((classify . ((if register "-u") (if elmo-spam-bogofilter-database-directory (list "-d" elmo-spam-bogofilter-database-directory)))) - (register . ("-v" - (if spam "-s" "-n") + (register . ((if spam "-s" "-n") (if restore (if spam "-N" "-S")) (if elmo-spam-bogofilter-database-directory (list "-d" elmo-spam-bogofilter-database-directory))))) -- 1.7.10.4