Re: M-d in an imap summary

[Ted Zlatanov <tzz@lifelogs.com>]

On Tue, 04 Nov 2008 14:54:48 +0100 Didier Verna <didier@xemacs.org> wrote: 

dvl> Ted Zlatanov <tzz@lifelogs.com> wrote:
>> On Mon, 03 Nov 2008 17:02:20 +0100 Didier Verna <didier@xemacs.org> wrote: 
>> 
dvl> I'd like to be able to M-d some articles in an nnimap summary buffer,
dvl> and have it do the ExpectedThing(tm), which would be to do the
dvl> equivalent of my gmail account function "Report Spam".
>> 
dvl> Does anybody have a ready-made recipe for this ?
>> 
>> What is the ExpectedThing?

dvl>   This (don't bother; I ended up doing it myself):

I don't use GMail so I needed some explanation.

dvl> (defadvice gnus-summary-mark-as-spam (around gnus activate)
dvl>   "Wrapper around the original `gnus-summary-mark-as-spam' function.
dvl> Detect calls within a GMail IMAP group, and move the article directly to the
dvl> spam folder."
dvl>   (let ((method (gnus-find-method-for-group gnus-newsgroup-name)))
dvl>     (if (and (eq (car method) 'nnimap)
dvl> 	     (string= (cadr method) "gmail"))
dvl> 	(gnus-summary-move-article n "nnimap+gmail:[Gmail]/Spam")
dvl>       ad-do-it)))

This is the same as setting the spam process destination for the
spam-move processing backend if you use spam.el, except it happens
immediately instead of when you exit the summary buffer.

If you do it with spam.el, you can use group/topic parameters or the
global gnus-spam-process-destinations variable to define the move
target, plus of course you can stack other backends in addition to just
moving the spam, and you can manage ham as well.

Ted