.emacs-my
changeset 908 e3b3e9f4d759
parent 906 da962aa69458
child 909 14efc19ada1c
equal deleted inserted replaced
907:8a6c364061e2 908:e3b3e9f4d759
  1466  gnus-thread-sort-functions '(gnus-thread-sort-by-date gnus-thread-sort-by-total-score)
  1466  gnus-thread-sort-functions '(gnus-thread-sort-by-date gnus-thread-sort-by-total-score)
  1467  )
  1467  )
  1468 
  1468 
  1469 ;; gnus-summary-mark-below gnus-summary-default-score gnus-summary-default-high-score gnus-summary-default-low-score
  1469 ;; gnus-summary-mark-below gnus-summary-default-score gnus-summary-default-high-score gnus-summary-default-low-score
  1470 
  1470 
  1471 ;; Scoring, adaptive score.
  1471 ;; Scoring.
       
  1472 (setq
       
  1473  gnus-score-interactive-default-score 50
       
  1474  gnus-summary-mark-below 0
       
  1475  gnus-summary-expunge-below -40
       
  1476  gnus-thread-expunge-below -40)
       
  1477 
  1472 (setq
  1478 (setq
  1473  gnus-use-scoring t
  1479  gnus-use-scoring t
  1474  gnus-save-score t
  1480  gnus-save-score t
  1475  ;; gnus-use-adaptive-scoring t
       
  1476  gnus-score-expiry-days 60
  1481  gnus-score-expiry-days 60
  1477  gnus-decay-scores t
  1482  gnus-decay-scores t
  1478  gnus-score-interactive-default-score 100
       
  1479  gnus-score-decay-constant 3
  1483  gnus-score-decay-constant 3
  1480  gnus-default-adaptive-score-alist
       
  1481  '(
       
  1482    (gnus-unread-mark)
       
  1483    (gnus-ticked-mark (subject 5))
       
  1484    (gnus-dormant-mark (subject 5))
       
  1485    (gnus-del-mark (from -5) (followup -5))
       
  1486    ;; (gnus-read-mark (from 2) (subject 1))
       
  1487    (gnus-killed-mark (subject -5))
       
  1488    (gnus-catchup-mark (subject -1))
       
  1489    (gnus-kill-file-mark (from -9999))
       
  1490    )
       
  1491  )
  1484  )
       
  1485 
       
  1486 (setq gnus-use-adaptive-scoring t)
       
  1487 (setq gnus-default-adaptive-score-alist
       
  1488       '(
       
  1489         (gnus-unread-mark)
       
  1490         (gnus-ticked-mark (subject 5))
       
  1491         (gnus-dormant-mark (subject 50))
       
  1492         ;; (gnus-del-mark (from -5) (followup -5))
       
  1493         (gnus-read-mark (followup -50))
       
  1494         (gnus-killed-mark (followup -50))
       
  1495         ;; (gnus-catchup-mark (subject -50))
       
  1496         (gnus-kill-file-mark (from -9999))
       
  1497         )
       
  1498       )
       
  1499 
  1492 ;; Increase the score for followups to a sent article.
  1500 ;; Increase the score for followups to a sent article.
  1493 (eval-after-load 'gnus-score
  1501 (eval-after-load 'gnus-score
  1494   '(progn
  1502   '(progn
  1495      (add-hook 'message-sent-hook 'gnus-score-followup-article)
  1503      (add-hook 'message-sent-hook 'gnus-score-followup-article)
  1496      (add-hook 'message-sent-hook 'gnus-score-followup-thread)
  1504      (add-hook 'message-sent-hook 'gnus-score-followup-thread)