From: Henrik Enberg <henrik@enberg.org>
Subject: Re: Spam spam spam spam spam
Date: Sat, 30 Mar 2002 17:34:43 +0100 [thread overview]
Message-ID: <87it7exbdo.fsf@enberg.org> (raw)
In-Reply-To: <m3hemym5o4.fsf@quimbies.gnus.org> (Lars Magne Ingebrigtsen's message of "Sat, 30 Mar 2002 16:33:31 +0100")
Lars Magne Ingebrigtsen <larsi@gnus.org> writes:
> When I woke up today, I had 75 new mail messages. Out of these, 72
> were spam. And all different.
>
> It's getting pretty annoying.
>
> Has anybody done any thinking about how to tie Gnus into the various
> spam inhibitants that exist? I could easily see doing splitting based
> on ordb/Vipul's Razor/Spamassassin/etc, and having single-stroke
> commands in Gnus for reporting spam to the proper instances. Say, `y'
> to send the spam for open relay checking, Razoring, assassination and
> all the rest.
Well, I cufted up this function for reporting to razor via spamassassin
a few days ago, which I bound to $. I have even been a good boy and
reported all my span since then. Now that I look at it it occurs
to me that it should remove the various X-Gnus-* headers before
reporting.
(defun gnus-spamassassin-report ()
"Report message on current summary line to spamassassin."
(interactive)
(let* ((article (car (gnus-summary-work-articles 1)))
(buffer (save-excursion (nnheader-set-temp-buffer
" *spamassassin*")))
(header (gnus-summary-article-header article)))
(if (not (vectorp header))
(message "%s is not a real article." article)
(when (y-or-n-p "Really report this message to spamassasin? ")
(save-window-excursion
(let ((gnus-display-mime-function nil)
(gnus-article-prepare-hook nil))
(gnus-summary-select-article t nil nil article)))
(save-excursion
(set-buffer buffer)
(erase-buffer)
(insert-buffer-substring gnus-original-article-buffer)
(call-process-region (point-min) (point-max) "spamassassin"
nil nil nil "-r"))
(message "Message reported.")))
(gnus-kill-buffer buffer)
(gnus-summary-position-point)
(gnus-set-mode-line 'summary)))
--
I acted to show my love for Jodie Foster.
next prev parent reply other threads:[~2002-03-30 16:34 UTC|newest]
Thread overview: 71+ messages / expand[flat|nested] mbox.gz Atom feed top
2002-03-30 15:33 Lars Magne Ingebrigtsen
2002-03-30 15:59 ` Lars Magne Ingebrigtsen
2002-04-01 14:44 ` NAGY Andras
2002-04-05 20:01 ` Ted Zlatanov
2002-04-05 21:41 ` Kai Großjohann
2002-04-05 22:27 ` Derrell.Lipman
2002-04-09 17:44 ` Toby Speight
2002-04-05 21:42 ` Jon Ericson
2002-04-05 22:59 ` Ted Zlatanov
2002-04-02 16:31 ` Ted Zlatanov
2002-04-02 19:52 ` Lars Magne Ingebrigtsen
2002-04-02 22:06 ` Ted Zlatanov
2002-04-05 19:33 ` Ted Zlatanov
2002-03-30 16:09 ` Robin S. Socha
2002-03-30 16:32 ` Lars Magne Ingebrigtsen
2002-03-30 16:56 ` Lloyd Zusman
2002-03-30 17:05 ` Lars Magne Ingebrigtsen
2002-03-30 18:27 ` Lloyd Zusman
2002-04-01 14:46 ` NAGY Andras
2002-04-01 15:11 ` Lloyd Zusman
2002-03-30 17:30 ` Robin S. Socha
2002-03-30 17:34 ` Lars Magne Ingebrigtsen
2002-03-30 18:27 ` Robin S. Socha
2002-03-31 22:00 ` Stainless Steel Rat
2002-03-30 16:33 ` Lars Magne Ingebrigtsen
2002-03-30 16:43 ` Henrik Enberg
2002-03-30 16:53 ` Robin S. Socha
2002-03-30 17:35 ` Henrik Enberg
2002-03-30 17:58 ` Robin S. Socha
2002-03-30 18:29 ` Lars Magne Ingebrigtsen
2002-03-30 18:52 ` Harry Putnam
2002-03-30 19:37 ` Jason R. Mastaler
2002-03-30 23:46 ` Lars Magne Ingebrigtsen
2002-03-31 0:38 ` Jason R. Mastaler
2002-04-01 14:07 ` Lloyd Zusman
2002-04-04 3:28 ` news
2002-03-31 2:07 ` Mark Milhollan
2003-01-01 21:06 ` Lars Magne Ingebrigtsen
2003-01-02 19:02 ` Simon Josefsson
2002-03-30 16:34 ` Henrik Enberg [this message]
2002-03-30 16:45 ` Lars Magne Ingebrigtsen
2002-03-30 16:52 ` Lars Magne Ingebrigtsen
2002-03-30 17:45 ` Kai Großjohann
2002-03-30 18:29 ` Lars Magne Ingebrigtsen
2002-03-30 19:28 ` Lars Magne Ingebrigtsen
2002-03-31 1:39 ` Paul Jarc
2002-03-31 1:45 ` Lars Magne Ingebrigtsen
2002-03-31 1:48 ` Paul Jarc
2002-03-31 1:57 ` Lars Magne Ingebrigtsen
2002-03-31 15:23 ` Lars Magne Ingebrigtsen
2002-03-31 16:20 ` Romain FRANCOISE
2002-03-31 18:19 ` Russ Allbery
2002-04-02 7:09 ` Michel Schinz
2002-04-03 5:10 ` Russ Allbery
2002-04-03 13:50 ` Frank Schmitt
2002-03-31 1:31 ` Daniel Pittman
2003-01-01 21:05 ` Lars Magne Ingebrigtsen
2002-03-31 15:34 ` Fabien Penso
2002-03-31 15:50 ` Lars Magne Ingebrigtsen
2002-03-31 16:06 ` Fabien Penso
2002-03-31 18:11 ` Russ Allbery
2002-03-31 18:31 ` Lars Magne Ingebrigtsen
2002-04-01 17:22 ` Paul Jarc
2002-04-01 19:25 ` Lars Magne Ingebrigtsen
2002-04-01 19:34 ` Paul Jarc
2002-04-01 18:22 ` Chris Shenton
2002-04-13 22:49 ` John H Palmieri
2002-04-13 23:00 ` Nevin Kapur
2002-04-14 0:04 ` Stainless Steel Rat
2002-04-14 0:57 ` Bill White
2002-04-21 3:38 ` Harry Putnam
Reply instructions:
You may reply publicly to this message via plain-text email
using any one of the following methods:
* Save the following mbox file, import it into your mail client,
and reply-to-all from there: mbox
Avoid top-posting and favor interleaved quoting:
https://en.wikipedia.org/wiki/Posting_style#Interleaved_style
* Reply using the --to, --cc, and --in-reply-to
switches of git-send-email(1):
git send-email \
--in-reply-to=87it7exbdo.fsf@enberg.org \
--to=henrik@enberg.org \
/path/to/YOUR_REPLY
https://kernel.org/pub/software/scm/git/docs/git-send-email.html
* If your mail client supports setting the In-Reply-To header
via mailto: links, try the mailto: link
Be sure your reply has a Subject: header at the top and a blank line
before the message body.
This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for NNTP newsgroup(s).