I'm interested in adding names from gnus into my database, but only those
belonging to people who's messages I save or reply to.
I looked around a bit at the function which saves and there appear to be no
hooks, besides the usual write-file-hooks which wouldn't be very useful at
this point.
Would something like the following work? Well, I tried it and it seems to
do the right thing, although the bbdb buffer popped up temporarily. Can I
get it to not do that at all? Yes, I have bbdb-use-pop-up on.
(defun gnus-summary-bbdb-save-in-mail (&optional filename)
"Add sender's name to bbdb, if it isn't there and
append this article to a Unix mail file via gnus-summary-save-in-mail."
(interactive)
(let ((record (bbdb/gnus-update-record t)))
(if (null record) (error "unperson")))
(gnus-summary-save-in-mail filename))
(define-key gnus-summary-mode-map "\C-o" 'gnus-summary-bbdb-save-in-mail)
I would then do something similar with gnus-summary-reply...
Jack Vinson [EMAIL PROTECTED]
The Purple Puddle Eater and Captain Jack
"Yo ee oo, we owe. No we don't, we own."-The Simpson's 21 October 1993 episode
