Hello.

I've made some splitting in gnus bbdb-dependant in the following way:

(setq 
 nnimap-split-inbox '("INBOX")
 nnimap-split-rule 'nnimap-split-fancy
 nnimap-split-fancy
 '(|
   (:  pre-split)
   (: bbdb-split)
   (:   ml-split)
   (:   sj-split)
   (: post-split)
   "IMAP/junk"
   )
 )
...
(defun bbdb-split ()
  "We want people, who are in bbdb not to be splitted to spam"
  (let ((who (cadr
              (gnus-extract-address-components (message-fetch-field "from"))
              )))
    (if (bbdb-search (bbdb-records) nil nil who)
        nil
        '(: spam-split)
      )
    )
  )

(defun spam-split ()
  "Returns spam-filter split"
...

The idea is not to put people who are in ~/.bbdb through spam
filtering. Splitting works just fine, but the trouble comes from
another side: if I have nnimap-split-fancy with bbdb-split adding new
net field to bbdb does not work. For example, I select an entry, put
a cursor on net record, press 'e', edit net field, press Enter and get

bbdb-record-edit-net: Wrong number of arguments: (lambda nil "We want people, who are 
in bbdb not to be splitted to spam" (let ((who (cadr (gnus-extract-address-components 
(message-fetch-field "from"))))) (if (bbdb-search (bbdb-records) nil nil who) nil 
(quote (: spam-split))))), 2

What is wrong here?

PS, please, Cc me on replies, I am not subscribed to the list. 

Thanks,
-- 
Alexander Kotelnikov
Saint-Petersburg, Russia


-------------------------------------------------------
This sf.net email is sponsored by: Dice - The leading online job board
for high-tech professionals. Search and apply for tech jobs today!
http://seeker.dice.com/seeker.epl?rel_code=31
_______________________________________________
[EMAIL PROTECTED]
https://lists.sourceforge.net/lists/listinfo/bbdb-info
BBDB Home Page: http://bbdb.sourceforge.net/

Reply via email to