I use 100 for replay to me and 200 for essential mails, and -50 for bad mails.
authorOleksandr Gavenko <gavenkoa@gmail.com>
Mon, 24 Sep 2012 19:58:13 +0300
changeset 945 79c13b7327fa
parent 944 664e6f4c3dc8
child 946 c0ab115a12cc
I use 100 for replay to me and 200 for essential mails, and -50 for bad mails.
.emacs-my
all.SCORE
--- a/.emacs-my	Mon Sep 24 19:45:13 2012 +0300
+++ b/.emacs-my	Mon Sep 24 19:58:13 2012 +0300
@@ -1545,18 +1545,18 @@
  gnus-thread-expunge-below -40)
 
 (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 (subject 5))
-        (gnus-dormant-mark (subject 50))
+        (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
--- a/all.SCORE	Mon Sep 24 19:45:13 2012 +0300
+++ b/all.SCORE	Mon Sep 24 19:58:13 2012 +0300
@@ -1,14 +1,14 @@
 ;; -*- mode: emacs-lisp -*-
 (
  ("from"
-  ("Oleksandr Gavenko" 200))
+  ("Oleksandr Gavenko" 200 nil s))
  ("from"
-  ("gavenkoa" 200))
+  ("gavenkoa" 200 nil s))
  ("from"
-  ("Юрий Гавенко" 200))
+  ("Юрий Гавенко" 200 nil s))
  ("references"
   ("@gavenkoa.example.com" 100)
   ("@desktop.home.int" 100))
- (mark-and-expunge -10)
- (thread-mark-and-expunge -10)
+ (mark-and-expunge -50)
+ (thread-mark-and-expunge -50)
  )