(t
mail-close-quote)))))
-
-(setq nnmail-split-methods
- (list '("junk.2004" "^From:.*Cron")
- '("spam" "^From:.*lifeminders.com")
- '("spam" "^From:.*qualityemail.com")
- '("spam" "^From:.*ibd@inbox-deal.com")
- '("spam" "^From:.*@link2buy.com")
- '("spam" "^Subject: =\\?ks_c_5601-1987")
- '("spam" "^Subject:.*Boost Your Windows Reliability!")
- '("spam" "^Subject:.*Xsamplesampledesktopdesktopsamplesampledesktopsamplesamplesamplesamplesampledesktopsamplesamplesamplesampledesktopsamplesampledesktopdesktopsamplesamplesampledesktopsampledesktopdesktopdesktopdesktopdesktopsamplesampledesktopdesktopsampledesktopsampledesktadd.nodesktop")
- '("spam" "^From: spam_filter@linuxfreemail.com")
- '("spam" "^Content-Type:.*charset=.*KS_C_5601-1987")
- '("spam" "^Content-Type:.*charset=.*BIG5")
- '("spam" "^Content-Type:.*charset=.*GB2312")
- '("spam" "^Subject:.*±¤°í")
- '("spam" "^Subject:.*±¤°í")
- ; Hand-moderated lists over automatic spam detection
- '("bugtraq.2004" "^Delivered-To:.*bugtraq@securityfocus.com")
- '("maybe-spam" "^X-Spam-Status: Yes")
- '("infobeat" "^From:.*InfoBeat")
- '("in-2004-news" "^Delivered-To:.*tollef-news")
- '("www.zope.div" "^\\(To\\|Cc\\):.*zope@\\(zope\\|egroups.com\\)")
- '("drift.fagerborg" "^\\(To\\|Cc\\):.*drift@.*fagerborg")
- '("drift.fagerborg" "^\\(To\\|Cc\\):.*fa-drift")
- '("drift.pvv" "^\\(Delivered-To\\|\\):.*drift@pvv")
- '("drift.pvv.aktive" "^\\(Delivered-To\\|\\):.*aktive@pvv")
- '("drift.pvv.styret" "^\\(Delivered-To\\|\\):.*pvv@pvv")
- '("drift.pvv.styret" "^\\(Delivered-To\\|\\):.*styret?@pvv")
- '("drift.pvv.tk" "^\\(Delivered-To\\|\\):.*tk@pvv")
- '("drift.pvv.cert" "^\\(Delivered-To\\|\\):.*cert@pvv")
- '("drift.pvv.root" "^\\(Delivered-To\\|\\):.*root@pvv")
- '("drift.pvv.sherlock" "^\\(Delivered-To\\|\\):.*sherlock@pvv")
- '("drift.pvv.nerds" "^\\(Delivered-To\\|\\):.*nerds@pvv")
- '("drift.pvv.abuse" "^\\(Delivered-To\\|\\):.*abuse@pvv")
- '("drift.pvv.nuccc-2004" "^List-Id:.*nuccc.list.pvv.org")
-
- '("drift.opera.diverse" "^\\(X-BeenThere\\|To\\|Cc\\):.*server@opera")
- '("drift.opera.www.opera.com" "^From:.*root@opera.com")
- '("drift.opera.security" "^\\(To\\|Cc\\):.*\\(security\\|security-issues\\)@opera")
- '("jobb.opera.elektra" "^List-Id:.*elektra.opera")
- '("drift.uio" "^\\(To\\|Cc\\):.*linux-drift@uio")
- '("drift.egroups" "^\\(To\\|Cc\\):.*egroups-managers")
- '("drift.opera.news" "^To:.*\\(usenet@\\|news@\\).*opera")
- '("drift.opera.news" "^To:.*\\(usenet@\\|news@\\).*pvv")
- '("drift.raw.news" "^To:.*\\(usenet@\\|news@\\).*raw")
- '("drift.opera.epost" "^To:.*\\(postmaster\\|root\\)@opera")
- '("drift.opera.backup" "^To:.*tollef-opera-backup")
- '("drift.opera.staff" "^\\(To\\|Cc\\):.*staff@.*opera")
- '("drift.opera.oslo" "^\\(To\\|Cc\\):.*oslo@.*opera")
- '("drift.opera.linux" "^\\(To\\|Cc\\):.*opera-linux@opera")
- '("drift.opera.panic" "^\\(To\\|Cc\\):.*panic@opera")
- '("drift.opera.mac-developer" "^List-Id:.*mac-developer.opera.no")
- '("drift.opera.epostlister" "^\\(To\\|Cc\\):.*admin@opera")
- '("drift.opera.epostlister" "^\\(To\\|Cc\\):.*owner@opera")
- '("drift.opera.emergency" "^\\(To\\|Cc\\):.*tfheen-netsaint@opera")
- '("drift.hardware.sherlock" "^\\(To\\|Delivered-To\\|Envelope-to\\):.*sherlock@hardware")
- '("drift.hardware.emergency" "^From:.*netsaint@.*hardware")
- '("drift.hardware.news" "^\\(To\\|Cc\\|Delivered-To\\):.*usenet@.*hardware.no")
- '("drift.hardware.drift" "^\\(To\\|Cc\\|Delivered-To\\):.*drift@hardware.no")
- '("drift.hardware.driftint" "^Envelope-To:.*driftint.hardware")
- '("drift.hardware.firewall" "^\\(To\\|Cc\\|Delivered-To\\):.*firewall@webdeal.no")
- '("drift.hardware.rt" "^To:.*AdminCc of hw.no")
-
- '("drift.samfundet.gsf" "^\\(To\\|Cc\\):.*gsf@.*\\(samfundet\\|stud\\)")
- '("drift.samfundet.gsk" "^\\(To\\|Cc\\):.*gsk@.*\\(samfundet\\|stud\\)")
- '("drift.isfit.it-admin" "Delivered-To:.*it-admin@isfit.org")
- '("drift.isfit.mail" "Subject: bayer.isfit.org Daily Mail Report")
- '("drift.isfit.logwatch" "Subject: LogWatch for bayer.isfit.org")
- '("drift.lis.drift" "^\\(To\\|Cc\\|Delivered-To\\):.*drift@sk[ou]lelinux.no")
- '("drift.itk.rt" "^X-RT-Loop-Prevention: \\(samfundet\\|itk\\)")
- '("drift.itk.arpwatch" "From:.*arpwatch@samfundet.no")
- '("drift.itk.kort" "^\\(To\\|Cc\\):.*kort@.*\\(samfundet\\|stud\\)")
- '("drift.itk.itk" "^\\(To\\|Cc\\):.*itk@.*\\(samfundet\\|stud\\)")
- '("drift.itk.ethernity" "^\\(To\\|Cc\\):.*ethernity@.*\\(samfundet\\|stud\\)")
- '("drift.itk.sosialt" "^\\(To\\|Cc\\):.*itk-sosialt@.*\\(samfundet\\|stud\\)")
- '("drift.itk.intern" "^List-Id:.*itk-intern.samfundet")
- '("drift.itk.intern-intern" "^\\(To\\|Cc\\):.*itk-intern-intern@.*\\(samfundet\\|stud\\)")
- '("drift.itk.uka" "^\\(To\\|Cc\\):.*itk@.*uka")
- '("drift.itk.uka-itavd" "^\\(To\\|Cc\\):.*itavd@.*uka")
- '("drift.itk.unix" "^\\(To\\|Cc\\):.*unix@.*samfundet")
- '("drift.itk.sherlock" "^\\(To\\|Cc\\):.*sherlock@.*samfundet")
- '("drift.itk.leder" "^\\(To\\|Cc\\):.*itk-leder@.*samfundet")
- '("drift.itk.lister" "^From: mailman-owner@lists.samfundet.no")
- '("drift.itk.news" "\\(To\\|From\\):.*\\(usenet@\\|news@\\).*samfundet.no")
- '("drift.itk.uka-gjengsjefer" "^\\(To\\|Cc\\):.*gjengsjefer@.*uka")
-
- '("drift.news.nag.intern" "^\\(To\\|Cc\\):.*gullkorn@usenet.no")
- '("drift.news.nag.submissions" "^\\(To\\|Cc\\):.*no-alt-gullkorn@moderators")
- '("drift.news.localhost" "^\\(To\\|Cc\\):.*usenet@manon")
- '("drift.snort.localhost" "^Subject:.*snort daily report")
- '("anchordesk" "^From:.*AnchorDesk")
- '("postgres" "^\\(To\\|Cc\\):.*announce@postgresql.org")
-; '("firma.netscape" "^From:.*@netscape.com")
- '("firma.java" "^To:.*JDC.*@Sun.com")
- '("firma.java" "^To:.*devflash@eng.sun.com")
- '("firma.borland" "To:.*INPR04@BORLAND.COM")
- '("firma.div_tilbud" "^From:.*clubpdalist@list.pacbus.com")
- '("firma.div_tilbud" "list.cc-inc.com")
- '("firma.div_tilbud" "^To:.*Announce@linuxmall.com")
- '("firma.div_tilbud" "^From:.*salg@infolink.no")
- '("firma.java" "JDCTechTips@sun.com")
- '("div.moshez.discuss" "Delivered-To.*moshez-discuss@moshez.org")
- '("div.keysign.nuccc-2002" "\\(To\\|Cc\\):.*nuccc\\+keysign@acc.umu.se")
- '("div.hemsedal" "^\\(To:.*vaermottakere@skiinfo.no\\|From:.*vaer@skiinfo.no\\)")
- '("div.samfundet.diskusjon" "^\\(To\\|Cc\\):.*diskusjon@samfundet.no")
- '("div.samfundet.info" "^\\(To\\|Cc\\):.*info@samfundet.no")
- '("div.samfundet.gjenger" "^\\(To\\|Cc\\):.*gjenger@samfundet.no")
- '("div.ntnu.dans.lindy" "^List-Id:.*dans-lindy.list.stud.ntnu.no")
- '("div.ntnu.dans.swing-prat" "^List-Id:.*dans-swing-prat.list.stud.ntnu.no")
- '("div.ntnu.klatring" "^\\(To\\|Cc\\):.*tindegruppa.list.stud.ntnu.no")
- '("div.ntnu.speider" "^List-Id.*tssg.list.stud.ntnu.no")
- '("div.ntnu.speider" "^List-Id.*tssg-diskusjon.list.stud.ntnu.no")
- '("div.ntnu.fritt-forum" "^List-Id:.*fritt-forum.list.pvv.org")
- '("div.ntnu.programvarekvalitet" "^List-Id:.*kvalitet.raw.no")
- '("div.ntnu.kpro.kpro" "^List-Id:.*kpro.raw.no")
- '("div.ntnu.kpro.kpro-alle" "^List-Id:.*kpro-alle.raw.no")
- '("div.ntnu.eit.iktkunst" "^List-Id:.*iktkunst\\(.lists\\)?.raw.no")
- '("div.ntnu.progark.devel" "^List-Id:.*progark10-devel.list.stud.ntnu.no")
- '("div.ntnu.progark.commits" "^List-Id:.*progark10-commits.list.stud.ntnu.no")
- '("div.ntnu.plandrift.drift" "^List-Id:.*iisdrift.lists.raw.no")
- '("programmering.banal" "^\\(To\\|Cc\\):.*banal@starnix.com")
- '("programmering.together" "^To:.*@lists.oi.com")
- '("programmering.qt.snapshot" "^\\(To\\|Cc:\\).*snapshot-users@troll")
- '("div.hn" "^To:.*hn@coollist.com")
- '("div.hn" "^To:.*hw-intern")
- '("div.linux-i-skolen" "^List-Id:.*linuxiskolen.skolelinux.no")
- '("linux.linux-i-skolen.info" "^List-Id:.*info.skolelinux.no")
- '("linux.linux-i-skolen.devel" "^List-Id:.*devel.skolelinux.no")
- '("div.registrar" "\\(To\\|Cc\\):.*registrar@norid.no")
- '("div.tut" "\\(To\\|Cc\\):.*tut@nvg")
- '("div.geekski" "^List-Id.*geekski.hands.com")
- '("firma.ibm" "^To:.*techconnect")
- '("div.tipworld" "^To:.*tollef-tipworld")
- '("freesoftware.europen-se" "^\\(To\\|Cc\\):.*europen-se@dkuug.dk")
- '("freesoftware.rekall-devel.2004" "List-Id.*rekall-devel.rekallrevealed.org")
- '("freesoftware.cofsino" "List-Id.*cofsino.lists.raw.no")
- '("freesoftware.nafs" "List-Id.*nafs.mail.nafs.org")
- '("freesoftware.cvs.info" "List-Id.*info-cvs.gnu.org")
- '("freesoftware.cvs.bug" "List-Id.*bug-cvs.gnu.org")
- '("freesoftware.efn.listen" "List-Id.*efn-listen.ifi.uio.no")
- '("linux.spi.private.2004" "^List.*spi-private.lists.spi-inc.org")
- '("linux.progeny.pgi-workers" "^List-Id.*pgi-workers.lists.progeny.com")
- '("linux.progeny.discover-workers" "^List-Id.*discover-workers.lists.progeny.com")
-
- '("linux.debian.packages.mailman.hackers" "^List-Id:.*pkg-mailman-hackers.lists.alioth.debian.org")
- '("linux.debian.packages.mailman.mm-deb" "^List-Id:.*mm-deb.lists.xlab.net")
- '("linux.debian.packages.dpkg.debian-dpkg" "^List-Id:.*debian-dpkg.lists.debian.org")
- '("linux.debian.packages.dpkg.dpkg-rebels" "^List-Id:.*dpkg-rebels.raw.no")
- '("linux.debian.packages.dpkg.dpkg-commits" "^List-Id:.*dpkg-commits.raw.no")
- '("linux.debian.debconf3.debcamp-participants" "^List-Id:.*debcamp.skolelinux.no")
- '("linux.debian.debconf3.debconf3" "^List-Id:.*debconf.skolelinux.no")
- '("linux.debian.amd64.2004" "^List-Id:.*debian-amd64.lists.debian.org")
- '("linux.debian.apache-cvs.2004" "^To.*debian-apache@lists.raw.no")
- '("linux.debian.apache.2004" "^X-Mailing-List.*debian-apache")
- '("linux.debian.hurd-testdrive" "List-Id.*hurd-testdrive.moneybags.cs.uml.edu")
- '("linux.debian.dwn.2004" "^Delivered-To.*dwn@debian.org")
- '("linux.debian.cd.2004" "^X-Mailing-List.*debian-cd")
- '("linux.debian.testing.2004" "^X-Mailing-List.*debian-testing")
- '("linux.debian.www.2004" "^X-Mailing-List.*debian-www")
- '("linux.debian.debbugs.2004" "^X-Mailing-List.*debian-debbugs")
- '("linux.debian.laptop.2004" "^X-Mailing-List.*debian-laptop")
- '("linux.debian.ctte.2004" "^X-Mailing-List.*debian-ctte")
- '("linux.debian.devel-changes.2004" "^X-Mailing-List.*debian-devel-changes")
- '("linux.debian.emacsen.2004" "^X-Mailing-List.*debian-emacsen")
- '("linux.debian.policy.2004" "^X-Mailing-List.*debian-policy")
- '("linux.debian.project.2004" "^X-Mailing-List.*debian-project")
- '("linux.debian.python.2004" "^X-Mailing-List.*debian-python")
- '("linux.debian.qa.2004" "^X-Mailing-List.*debian-qa")
- '("linux.debian.bsd.2004" "^X-Mailing-List.*debian-bsd")
- '("linux.debian.curiosa.2004" "^X-Mailing-List.*debian-curiosa")
- '("linux.debian.www-cvs.2004" "^To.*joey-www-cvs@master.debian.org")
- '("linux.debian.www-cvs.2004" "^To.*cvsdiff-english@www-master.debian.org")
- '("linux.debian.java.2004" "^X-Mailing-List.*debian-java")
- '("linux.debian.events-eu.2004" "^X-Mailing-List.*debian-events-eu")
- '("linux.debian.boot.2004" "^X-Mailing-List.*debian-boot")
- '("linux.debian.boot-cvs.2004" "^Delivered-To: debian-installer_cvs@packages.qa.debian.org")
- '("linux.debian.edu.2004" "^List-Id.*debian-edu.lists.debian.org")
- '("linux.debian.devel.2004" "^X-Mailing-List.*debian-devel")
- '("linux.debian.private.2004" "^X-Mailing-List.*debian-private")
- '("linux.debian.mentors.2004" "^X-Mailing-List.*debian-mentors")
- '("linux.debian.vote.2004" "^X-Mailing-List.*debian-vote")
- '("linux.debian.newmaint.2004" "^X-Mailing-List.*debian-newmaint")
- '("linux.debian.changes" "^X-Mailing-List.*debian-changes")
- '("linux.debian.news" "^X-Mailing-List.*debian-news")
- '("linux.debian.security" "^X-Mailing-List.*debian-security")
- '("linux.debian.announce" "^X-Mailing-List.*debian-announce")
- '("linux.debian.deb-pgsql" "^\\(To\\|Cc\\|Resent-To\\):.*\\(deb-pgsql\\|debian-postgresql\\)")
- '("linux.debian.deb-pgsql" "^List-Id:.*debian-postgresql")
- '("linux.helix.updates" "^\\(To\\|Cc\\|Resent-From\\):.*updates@\\(helixcode.com\\|ximian.com\\)")
- '("linux.helix.announce" "^\\(To\\|Cc\\|Resent-From\\):.*announce@\\(helixcode.com\\|ximian.com\\)")
- '("linux.tuug" "^\\(To\\|Cc\\):.*tuug@nvg")
- '("linux.tuug" "^List-Id:.*tuug.tuug")
- '("linux.rh.security" "^\\(To\\|Cc\\|Resent-From\\):.*linux-security")
- '("linux.rh.alert" "^\\(To\\|Cc\\|Resent-From\\):.*tollef-rh-alert")
- '("linux.rh.announce" "^X-BeenThere: redhat-announce-list@redhat.com")
- '("linux.rh.watch" "^\\(To\\|Cc\\|Resent-From\\):.*redhat-watch")
- '("linux.limacute" "List-Id:.*limacute-list.limacute.org")
- '("programmering.koffice" "^\\(To\\|Cc\\|Resent-From\\):.*koffice")
- '("programmering.mailman.developer" "^List-Id:.*mailman-developers.python.org")
- '("programmering.mailman.user" "^List-Id:.*mailman-users.python.org")
- '("programmering.xml-sig" "^List-Id:.*xml-sig.python.org")
- '("programmering.ntnu.mugge" "^Delivered-To:.*mugge@samfundet.no")
- '("drift.opera.mailer-daemon" "To:.*[Mm]ailer-[Dd]aemon@opera")
- '("drift.opera.bounce" "From:.*[Mm]ailer-[Dd]aemon")
- '("drift.opera.bounce" "Subject:.*\\([Rr]eturned\\|[Uu]ndeliverable\\) *\\([Mm]ail\\|[Mm]essage\\)")
- '("drift.opera.bounce" "Subject: *Mail System Error - Returned Mail")
- '("drift.opera.bounce" "Subject: *Delivery failure")
- (list (format-time-string "in-%Y-%m") "")))
-(setq gnus-split-methods (reverse-nnml-list-in-list nnmail-split-methods))
-(setq gnus-move-split-methods (reverse-nnml-list-in-list nnmail-split-methods))
(add-hook 'nnmail-prepare-incoming-header-hook 'nnmail-fix-eudora-headers)
(defun tfheen-maybe-sign ()
(defun tfheen-mark-as-spam ()
(interactive)
- (let ((gnus-inhibit-treatment t)
- (mm-text-html-renderer 'lynx))
- (gnus-summary-pipe-message "sa-learn --spam --single")
- (gnus-summary-pipe-message (expand-file-name "~/bin/sa-learnd"))
- (gnus-summary-move-article nil "nnml:spam")
- (gnus-summary-next-subject 1)))
-
-(cw/for-host "yiwaz"
+ (gnus-summary-move-article nil (format-time-string "spam.%Y-%m"))
+ (gnus-summary-next-subject 1))
+
+(cw/for-host "yiwaz\\|thosu\\|golem"
(define-key gnus-summary-backend-map "s" 'tfheen-mark-as-spam)
(define-key gnus-summary-mode-map "z" 'tfheen-mark-as-spam)
(setq pgg-default-user-id "tfheen@raw.no"))
projects / dotfiles / commitdiff