From mboxrd@z Thu Jan  1 00:00:00 1970
X-Msuck: nntp://news.gmane.io/gmane.emacs.gnus.user/3599
Path: news.gmane.org!not-for-mail
From: Christoph Conrad <nospam@spamgourmet.com>
Newsgroups: gmane.emacs.gnus.user
Subject: Score article high when special sender and matching content
Date: Sun, 07 Mar 2004 22:55:46 +0100
Organization: Church of GNU Emacs
Message-ID: <86znasiaot.fsf@ID-24456.user.uni-berlin.de>
Reply-To: Christoph Conrad <christoph.conrad@gmx.de>
NNTP-Posting-Host: main.gmane.org
Mime-Version: 1.0
Content-Type: text/plain; charset=iso-8859-1
Content-Transfer-Encoding: 8bit
X-Trace: sea.gmane.org 1138669659 19542 80.91.229.2 (31 Jan 2006 01:07:39 GMT)
X-Complaints-To: usenet@sea.gmane.org
NNTP-Posting-Date: Tue, 31 Jan 2006 01:07:39 +0000 (UTC)
Original-X-From: nobody Tue Jan 17 17:32:28 2006
Original-Path: quimby.gnus.org!newsfeed.gazeta.pl!fu-berlin.de!uni-berlin.de!pd9ffe0b7.dip0.t-ipconnect.DE!not-for-mail
Original-Newsgroups: gnu.emacs.gnus
Original-NNTP-Posting-Host: pd9ffe0b7.dip0.t-ipconnect.de (217.255.224.183)
Original-X-Trace: news.uni-berlin.de 1078696532 65284468 I 217.255.224.183 ([24456] 10357)
User-Agent: Gnus/5.110002 (No Gnus v0.2) Emacs/21.3.50 (gnu/linux)
Cancel-Lock: sha1:1lNikRS6zztCcK8s1J2SaB6b0Go=
Original-Xref: bridgekeeper.physik.uni-ulm.de gnus-emacs-gnus:3740
Original-Lines: 33
X-Gnus-Article-Number: 3740   Tue Jan 17 17:32:28 2006
Xref: news.gmane.org gmane.emacs.gnus.user:3599
Archived-At: <http://permalink.gmane.org/gmane.emacs.gnus.user/3599>

Hi,

i get spam reports from the blocked spam from my mail provider GMX. I
manually scan the list to find false positives and want to automate the
process with my bbdb entries.

So, if "From:" matches "mailings@gmx.net" the content of the mail should
be checked against all net addresses of my bbdb, and if one matches,
sould be scored very high so that it shows up in the summary in a
special color.

It can't implement it with all.SCORE cause there is no matching function
and eval entries are ignored.

For matching against bbdb one can use a modified snippet from Bill White

(defun billw-BBDB-whitelist ()
  "BBDB is a whitelist."
  (let ((who (message-fetch-field "from")))
    (when who
      (setq who (cadr (gnus-extract-address-components who)))
      (if (and (not (string-match gnus-ignored-from-addresses who))
               (bbdb-search-simple nil who))
          "Incoming"
        nil))))

Any idea?

Herzliche Grüße,
  Christoph
-- 
Wir sehen die Dinge nicht so wie sie sind - sondern wir sehen sie, wie
wir sind.