1543 gnus-summary-mark-below 0 |
1543 gnus-summary-mark-below 0 |
1544 gnus-summary-expunge-below -40 |
1544 gnus-summary-expunge-below -40 |
1545 gnus-thread-expunge-below -40) |
1545 gnus-thread-expunge-below -40) |
1546 |
1546 |
1547 (setq gnus-use-adaptive-scoring t) |
1547 (setq gnus-use-adaptive-scoring t) |
|
1548 ;; I use 100 for replay to me and 200 for essential mails, and -50 for bad mails. |
1548 (setq gnus-default-adaptive-score-alist |
1549 (setq gnus-default-adaptive-score-alist |
1549 '( |
1550 '( |
1550 (gnus-unread-mark) |
1551 (gnus-unread-mark) |
1551 (gnus-ticked-mark (subject 5)) |
1552 (gnus-ticked-mark (followup 100)) |
1552 (gnus-dormant-mark (subject 50)) |
1553 (gnus-dormant-mark (followup 100)) |
1553 ;; (gnus-read-mark (followup -50)) |
1554 ;; (gnus-read-mark (followup -50)) |
1554 ;; (gnus-catchup-mark (subject -50)) |
1555 ;; (gnus-catchup-mark (subject -50)) |
1555 (gnus-del-mark (followup -50)) |
1556 (gnus-del-mark (followup -50)) |
1556 (gnus-killed-mark (followup -50)) |
1557 (gnus-killed-mark (followup -50)) |
1557 (gnus-kill-file-mark (from -9999)) |
1558 (gnus-kill-file-mark (from -9999)) |
1558 ) |
1559 )) |
1559 ) |
|
1560 |
1560 |
1561 ;; Increase the score for followups to a sent article. |
1561 ;; Increase the score for followups to a sent article. |
1562 (eval-after-load 'gnus-score |
1562 (eval-after-load 'gnus-score |
1563 '(progn |
1563 '(progn |
1564 ;; (add-hook 'message-sent-hook 'gnus-score-followup-article) |
1564 ;; (add-hook 'message-sent-hook 'gnus-score-followup-article) |