--- a/.emacs-my	Sun Aug 12 11:07:43 2012 +0300
+++ b/.emacs-my	Sun Aug 12 11:08:25 2012 +0300
@@ -1468,27 +1468,35 @@
 
 ;; gnus-summary-mark-below gnus-summary-default-score gnus-summary-default-high-score gnus-summary-default-low-score
 
-;; Scoring, adaptive score.
+;; Scoring.
+(setq
+ gnus-score-interactive-default-score 50
+ gnus-summary-mark-below 0
+ gnus-summary-expunge-below -40
+ gnus-thread-expunge-below -40)
+
 (setq
  gnus-use-scoring t
  gnus-save-score t
- ;; gnus-use-adaptive-scoring t
  gnus-score-expiry-days 60
  gnus-decay-scores t
- gnus-score-interactive-default-score 100
  gnus-score-decay-constant 3
- gnus-default-adaptive-score-alist
- '(
-   (gnus-unread-mark)
-   (gnus-ticked-mark (subject 5))
-   (gnus-dormant-mark (subject 5))
-   (gnus-del-mark (from -5) (followup -5))
-   ;; (gnus-read-mark (from 2) (subject 1))
-   (gnus-killed-mark (subject -5))
-   (gnus-catchup-mark (subject -1))
-   (gnus-kill-file-mark (from -9999))
-   )
  )
+
+(setq gnus-use-adaptive-scoring t)
+(setq gnus-default-adaptive-score-alist
+      '(
+        (gnus-unread-mark)
+        (gnus-ticked-mark (subject 5))
+        (gnus-dormant-mark (subject 50))
+        ;; (gnus-del-mark (from -5) (followup -5))
+        (gnus-read-mark (followup -50))
+        (gnus-killed-mark (followup -50))
+        ;; (gnus-catchup-mark (subject -50))
+        (gnus-kill-file-mark (from -9999))
+        )
+      )
+
 ;; Increase the score for followups to a sent article.
 (eval-after-load 'gnus-score
   '(progn