From mboxrd@z Thu Jan 1 00:00:00 1970 X-Msuck: nntp://news.gmane.io/gmane.emacs.gnus.general/46865 Path: main.gmane.org!not-for-mail From: Ted Zlatanov Newsgroups: gmane.emacs.gnus.general Subject: Re: new spam.el Date: Mon, 30 Sep 2002 21:34:04 -0400 Organization: =?koi8-r?q?=F4=C5=CF=C4=CF=D2=20=FA=CC=C1=D4=C1=CE=CF=D7?= @ Cienfuegos Sender: owner-ding@hpc.uh.edu Message-ID: References: NNTP-Posting-Host: localhost.gmane.org Mime-Version: 1.0 Content-Type: text/plain; charset=us-ascii X-Trace: main.gmane.org 1033435899 21461 127.0.0.1 (1 Oct 2002 01:31:39 GMT) X-Complaints-To: usenet@main.gmane.org NNTP-Posting-Date: Tue, 1 Oct 2002 01:31:39 +0000 (UTC) Cc: ding Return-path: Original-Received: from malifon.math.uh.edu ([129.7.128.13]) by main.gmane.org with esmtp (Exim 3.35 #1 (Debian)) id 17wBsv-0005ZR-00 for ; Tue, 01 Oct 2002 03:31:37 +0200 Original-Received: from sina.hpc.uh.edu ([129.7.128.10] ident=lists) by malifon.math.uh.edu with esmtp (Exim 3.20 #1) id 17wBsK-0003Gd-00; Mon, 30 Sep 2002 20:31:00 -0500 Original-Received: by sina.hpc.uh.edu (TLB v0.09a (1.20 tibbs 1996/10/09 22:03:07)); Mon, 30 Sep 2002 20:31:40 -0500 (CDT) Original-Received: from sclp3.sclp.com (qmailr@sclp3.sclp.com [209.196.61.66]) by sina.hpc.uh.edu (8.9.3/8.9.3) with SMTP id UAA25900 for ; Mon, 30 Sep 2002 20:31:28 -0500 (CDT) Original-Received: (qmail 21717 invoked by alias); 1 Oct 2002 01:30:42 -0000 Original-Received: (qmail 21712 invoked from network); 1 Oct 2002 01:30:42 -0000 Original-Received: from ns3.beld.net (208.229.215.83) by gnus.org with SMTP; 1 Oct 2002 01:30:42 -0000 Original-Received: from heechee.beld.net (dhcp-0-50-8b-df-51-5e.cpe.beld.net [65.202.179.7]) by ns3.beld.net (Postfix) with ESMTP id B40E53B8F8; Mon, 30 Sep 2002 21:30:41 -0400 (EDT) Original-To: Katsumi Yamaoka X-Face: bd.DQ~'29fIs`T_%O%C\g%6jW)yi[zuz6;d4V0`@y-~$#3P_Ng{@m+e4o<4P'#(_GJQ%TT= D}[Ep*b!\e,fBZ'j_+#"Ps?s2!4H2-Y"sx" Mail-Followup-To: Katsumi Yamaoka , ding In-Reply-To: (Katsumi Yamaoka's message of "Tue, 01 Oct 2002 08:31:28 +0900") Original-Lines: 24 User-Agent: Gnus/5.090008 (Oort Gnus v0.08) Emacs/21.2 (i386-redhat-linux-gnu) Precedence: list X-Majordomo: 1.94.jlt7 Xref: main.gmane.org gmane.emacs.gnus.general:46865 X-Report-Spam: http://spam.gmane.org/gmane.emacs.gnus.general:46865 On Tue, 01 Oct 2002, yamaoka@jpl.org wrote: > It is said by the macro `bbdb-search' which requires that the > 4th argument is a string or a symbol. So, I think the function > `spam-check-bbdb' can be modified as follows: > > (defun spam-check-bbdb () > "We want people, who are in bbdb not to be splitted to spam" > (let ((who (message-fetch-field "from"))) > (when who > (setq who (regexp-quote (cadr (gnus-extract-address-components who)))) > (bbdb-search (bbdb-records) nil nil who)))) I added the change, with one more modification (we want to return the value of spam-split-group, it's not t or nil). Thank you. I also fixed spam-check-whitelist, which also returned t or nil and should return spam-split-group or nil. I'm doing this to be consistent with Francois' code, which let each checking function return a string (spam-split-group) or nil, rather than have the spam-split function aggregate all the return values of t or nil. Ted