From 6c128e07c1ba677bb67389e8c7492f0b1e9a6164 Mon Sep 17 00:00:00 2001 From: tfheen Date: Wed, 21 May 2003 12:42:43 +0000 Subject: [PATCH] only make B s mark as spam on yiwaz git-svn-id: file:///svn/tfheen/trunk/dotfiles@149 8da78d58-1cd3-0310-bee5-d77bd1b3e8bf --- gnus | 14 +++++++++++++- 1 file changed, 13 insertions(+), 1 deletion(-) diff --git a/gnus b/gnus index 88b65de..f465f81 100644 --- a/gnus +++ b/gnus @@ -22,7 +22,8 @@ (cw/for-host "yiwaz\\|arabella" - (setq gnus-select-method '(nntp "localhost") + (setq gnus-select-method '(nntp "news") +;gnus-select-method '(nntp "localhost") gnus-secondary-select-methods '((nnml ""))) (add-to-list 'gnus-secondary-select-methods '(nntp "news.hardware.no")) ) @@ -69,6 +70,7 @@ inserts \" characters." (setq nnmail-split-methods (list '("junk.2003" "^From:.*Cron") '("spam" "^From:.*lifeminders.com") + '("spam" "^From:.*ibd@inbox-deal.com") '("spam" "^From:.*@link2buy.com") '("spam" "^Subject: =\\?ks_c_5601-1987") '("spam" "^Subject:.*Boost Your Windows Reliability!") @@ -78,6 +80,7 @@ inserts \" characters." '("spam" "^Content-Type:.*charset=.*BIG5") '("spam" "^Content-Type:.*charset=.*GB2312") '("spam" "^Subject:.*±¤°í") + '("spam" "^Subject:.*±¤°í") ; Hand-moderated lists over automatic spam detection '("bugtraq.2003" "^Delivered-To:.*bugtraq@securityfocus.com") '("maybe-spam" "^X-Spam-Status: Yes") @@ -191,6 +194,7 @@ inserts \" characters." '("linux.progeny.pgi-workers" "^List-Id.*pgi-workers.lists.progeny.com") '("linux.progeny.discover-workers" "^List-Id.*discover-workers.lists.progeny.com") + '("linux.debian.apache-cvs.2003" "^To.*debian-apache@lists.raw.no") '("linux.debian.hurd-testdrive" "List-Id.*hurd-testdrive.moneybags.cs.uml.edu") '("linux.debian.dwn.2003" "^Delivered-To.*dwn@debian.org") '("linux.debian.cd.2003" "^X-Mailing-List.*debian-cd") @@ -658,3 +662,11 @@ on multiple mail-followup-to headers" (setq gnus-treat-display-smileys nil) (cw/requiring-package (deuglify)) + +(defun tfheen-mark-as-spam () + (interactive) + (gnus-summary-pipe-message "sa-learn --spam --single") + (gnus-summary-move-article nil "nnml:spam")) + +(cw/for-host "yiwaz" + (define-key gnus-summary-backend-map "s" 'tfheen-mark-as-spam)) -- 2.39.5