Re: Mailing list split

[Xavier Maillard <zedek@gnu-rox.org>]

On  6 Jun 2004, Maciek Pasternacki wrote:

> Sorry for posting a level lower than I should; I'm writing from
> gnus-agent offline and I don't have original article here.
> 
> On Boomtime, Confusion 11, 3170 YOLD, Paul Johnson wrote:
> 
> > > I'm subscribed to dozens of mailing lists and I have an email
> > > account through which I receive all my mailing list mails. Is
> > > there a way to split the mail from that account automatically
> > > based on the mailing list headers?
> 
> [cut]
> 
> (setq nnmail-split-methods 'nnmail-split-fancy)
> (setq nnmail-split-fancy 
> '(|        
> ;;; cut -- `priority' splitting to root@myhost, abuse@myhost,
> ;;; postmaster@myhost, different adrdesses I use for work etc.
> 
> ;;; Mailing lists go here
> 
> ;; Yahoo groups go to listserv.<group-address>
> ("Mailing-List"    "list   \\([-a-z0-9]*\\)@yahoogroups.com;   contact
> .*-owner@yahoogroups.com" "listserv.\\1")
> 
> ;; Groups managed by ezmlm also.
> ("Mailing-List"
> "contact \\([-a-z0-9]*\\)-help@[^;]*; run by ezmlm"
> "listserv.\\1")
> 
> ;; This is single group that is on two independent servers
> ;; (Polish listserver and on yahoogroups -- everyone is
> ;; subscribed to both in case one wouldn't work or someone has
> ;; trouble sending to one of them) that should go to single mailbox
> (to "stachuriada@.*"
> "listserv.stachuriada")
> 
> ;; Not really newsgroups, just aliases to more than one person
> (to "przedluzacz@some.host.dont.matter"
> "listserv.przedluzacz")
> (to "towarzystwo@some.other.unmeaningful.host"
> "listserv.towarzystwo")
> 
> ;; Groups that use List-Id header, usually managed by Mailman
> ;; I should write a regexp like for ezmlm or yahoogroups, but
> ;; this one is a bit tricky (I even don't remember why now,
> ;; but it was) and I don't have time at the moment.
> ("List-Id" "tlug.linux.gda.pl" "listserv.tlug")
> ("List-Id" "tkabber.jabber.ru" "listserv.tkabber")
> ("List-Id" "jadmin.jabber.org" "listserv.jadmin")
> ("List-Id" "transwers.kombinat.nh.pl" "listserv.transwers")
> ("List-Id" "zope-dev.zope.org" "listserv.zope-dev")
> ("List-Id" "zope.zope.org" "listserv.zope")
> ("List-Id" "ekg2-commit.lists.ziew.org" "listserv.ekg2-commit")
> ("List-Id" "ekg2-devel.lists.ziew.org" "listserv.ekg2-devel")
> 
> ;; Some totally non-standard lists
> ("X-Mailing-List"           "oneiro@dont.give.full.address.to.spammers"
> "listserv.oneiro")   ("List-Help"  "http://www.postfix.org/lists.html"
> "listserv.postfix")
> 
> ;;; Here goes splitting rest of mail via BBDB to mailboxen for
> ;;; people I know and finally to mbox.misc for miscellaneous spam.
> 
> ))
> 
> Hope it helps.
> 
> Greets,
> 		--japhy

I use these rules which are quite powerful and efficient:

         ("list-unsubscribe" ".*<mailto:\\([^<>, \t\n]+\\)-ctl@.*" "INBOX.list.\\1")
         ("list-unsubscribe" ".*<mailto:\\([^<>, \t\n]+\\)-request@.*" "INBOX.list.\\1")
         ("list-unsubscribe" ".*<mailto:\\([^<>, \t\n]+\\)-unsubscribe@.*" "INBOX.list.\\1")
         ("list-unsubscribe" ".*=unsubscribe%20\\([^<>, \t\n]+\\)>.*" "INBOX.list.\\1")

These can deal with almost all my ML I am currently subscribed.


-- 
"sometimes i feel like we're making emacs better and better because we don't 
 know what to do with emacs once it is finished."

    -- AlexSchroeder on #emacs @OPN