[mew-dist 23838] bogofilter

[Masahiko KIMOTO]

質問させてください。

bogofilterを使おうと思って設定してみました。が、inc時のDが付いてくれません。

まず14日午前の時点のCVS版のmewをcoしてインストールしました。
次にbogofilterをインストールし、一通り設定し学習もさせて、incしてくる
メールのヘッダに
X-Bogosity: Yes, tests=bogofilter, spamicity=1.000000, version=0.11.1.3
などのエントリが付くようにしました。

この段階でmew-scan.elを眺めつつ、.mew.elに以下を書きました。

(setq mew-spam: "X-Bogosity:")
(defun mew-spam-bogofilter (val)
  (let ((case-fold-search t))
    (if (string-match "yes" val) ?D)))

(setq mew-inbox-action-alist
      `(
	("X-Bogosity:" mew-spam-bogofilter)
	("To:"
	 (,mew-mark-delete "my-dummy-email-addr at example.com"))
	("Subject:"
	 (,mew-mark-delete "アダルト" "未承諾広告"))
	("Content-Type:"
	 (,mew-mark-delete "big5" "gb2312" "ks_c_5601-1987" "euc-kr" "DEFAULT_CHARSET"))
	))

これでincすると、mew-inbox-action-alistに書いたルールのうち、ToとSubjectに
関するものにはDが付くのですが、X-Bogosity: YesになっているものにはDが付き
ません。

何が足りないのでしょうか。

mew 4.0.55 (7/14午前CVS版)
Emacs 21.2.1 on NetBSD-1.6Q
Bogofilter 0.11.1.3

です。

----------------------------------------------------------------------
    木本 雅彦 <kimoto at example.com> :  http://www.ohnolab.org/~kimoto
----------------------------------------------------------------------