From: Oleksandr Gavenko <gavenkoa@gmail.com>
To: info-gnus-english@gnu.org
Subject: Re: Are there any "advanced" tutorial on GNUS scoring?
Date: Sun, 31 Mar 2013 22:10:36 +0300 [thread overview]
Message-ID: <87obdz4c7n.fsf@gavenkoa.example.com> (raw)
In-Reply-To: <87y5d3tuqe.fsf@topper.koldfront.dk>
On 2013-03-31, Adam Sjøgren wrote:
> Oleksandr Gavenko <gavenkoa@gmail.com> writes:
>
>> Today I make my fifth attempt to configure GNUS scoring. And again I
>> fail to do this.
>
> The easiest way to get help is often:
>
> * Describe what you want to happen
> * Describe what you did
> * Describe what you expected to happen
> * Describe what happened instead
>
> I only use scoring as a rudimentary "kill file" myself (using only two
> levels: not shown at all and shown as already read), but if you provide
> some details, maybe somebody can help you.
>
> Complaining about the documentation in general terms is unlikely to
> result in any specific improvements :-)
>
OK! I like predictable behaviour and look for a way to read massive lists.
So default settings for adaptive scoring take me unwanted result.
================================================================
I set (in .emacs instead of .gnus.el):
(setq
gnus-show-threads t
gnus-thread-sort-functions '(gnus-thread-sort-by-date gnus-thread-sort-by-total-score)
)
(setq
gnus-use-scoring t
gnus-save-score t
gnus-score-expiry-days 60
;; gnus-decay-scores t
gnus-score-decay-constant 3
)
(setq gnus-score-interactive-default-score 100)
(setq gnus-use-adaptive-scoring t)
;; I use 100 for replay to me and 200 for essential mails, and -50 for bad mails.
(setq gnus-default-adaptive-score-alist
'(
(gnus-unread-mark)
(gnus-ticked-mark (followup 100))
(gnus-dormant-mark (followup 100))
;; (gnus-read-mark (followup -50))
;; (gnus-catchup-mark (subject -50))
(gnus-del-mark (followup -50))
(gnus-killed-mark (followup -50))
(gnus-kill-file-mark (from -9999))
))
;; Increase the score for followups to a sent article.
(eval-after-load 'gnus-score
'(progn
;; (add-hook 'message-sent-hook 'gnus-score-followup-article)
(add-hook 'message-sent-hook 'gnus-score-followup-thread)
))
(defun my-gnus-thread-score-function (&rest scores)
"If any followup have positive score assign greater available
score to thread, else assign lesser available score."
(let ( (max (apply 'max scores)) (min (apply 'min scores)) )
(if (< 0 max) max min)))
(setq gnus-thread-score-function #'my-gnus-thread-score-function)
and (in ~/.gnus/scores/all.SCORE):
(("from"
("Oleksandr Gavenko" 200 nil s))
("from"
("gavenkoa" 200 nil s))
("references"
("@gavenkoa.example.com" 100)
("@desktop.home.int" 100))
(mark-and-expunge -20)
(thread-mark-and-expunge -20))
================================================================
My goal:
*1*) kill trolls forever (by 'L' command I can do this permanently).
*2*) kill followups to trolls forever - DON"T KNOW HOW.
*3*) Show interesting or important person message anyway (by 'I' command or
by editing 'V e' score file I can do this permanently).
*4*) Show followups to my message anyway. Seems that this do job:
(add-hook 'message-sent-hook 'gnus-score-followup-thread)
*5*) After killing threads (by 'k' or 'C-M-k') expunge any followups to
killed messages forever - DON"T KNOW HOW. I try:
(setq gnus-use-adaptive-scoring t)
(setq gnus-default-adaptive-score-alist
(gnus-del-mark (followup -50))
(gnus-killed-mark (followup -50)))
but sometimes this not work. I read RSDN and SQLRU forum thought NNTP
gateway. Seems that underlie server software mess with article IDs. Do I
need '(thread -50)' instead of '(followup -50)'?
I like less typing. So try to exploit adaptive scoring which can convert 'r'
and 'K' marks into scores:
(setq gnus-default-adaptive-score-alist
(gnus-del-mark (followup -50))
(gnus-killed-mark (followup -50)))
when I leave group.
================================================================
Summary of questions:
* How to kill followups to trolls forever?
* If threads usually constructed fine by GNUS but (followup -50) do job bad
do I need use (thread -50)? Is "thread" new addition to GNUS (I don't
remember it when read GNUS manual from Emacs 22)?
--
Best regards!
_______________________________________________
info-gnus-english mailing list
info-gnus-english@gnu.org
https://lists.gnu.org/mailman/listinfo/info-gnus-english
next prev parent reply other threads:[~2013-03-31 19:10 UTC|newest]
Thread overview: 5+ messages / expand[flat|nested] mbox.gz Atom feed top
2013-03-31 15:34 Oleksandr Gavenko
2013-03-31 16:11 ` Adam Sjøgren
2013-03-31 19:10 ` Oleksandr Gavenko [this message]
2013-03-31 20:46 ` W. Greenhouse
[not found] ` <mailman.23175.1364757060.855.info-gnus-english@gnu.org>
2013-04-02 10:39 ` Anssi Saari
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=87obdz4c7n.fsf@gavenkoa.example.com \
--to=gavenkoa@gmail.com \
--cc=info-gnus-english@gnu.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).