1359 (gnus-catchup-mark (subject -1)) |
1359 (gnus-catchup-mark (subject -1)) |
1360 (gnus-kill-file-mark (from -9999)) |
1360 (gnus-kill-file-mark (from -9999)) |
1361 ) |
1361 ) |
1362 ) |
1362 ) |
1363 ;; Increase the score for followups to a sent article. |
1363 ;; Increase the score for followups to a sent article. |
1364 ;; (add-hook 'message-sent-hook 'gnus-score-followup-article) |
1364 (eval-after-load 'gnus-score |
1365 ;; (add-hook 'message-sent-hook 'gnus-score-followup-thread) |
1365 '(progn |
|
1366 (add-hook 'message-sent-hook 'gnus-score-followup-article) |
|
1367 (add-hook 'message-sent-hook 'gnus-score-followup-thread) |
|
1368 )) |
1366 |
1369 |
1367 ;; (setq gnus-home-score-file |
1370 ;; (setq gnus-home-score-file |
1368 ;; ;; All groups that match the regexp `"\\.emacs"' |
1371 ;; ;; All groups that match the regexp `"\\.emacs"' |
1369 ;; '(("\\.emacs" "emacs.SCORE") |
1372 ;; '(("\\.emacs" "emacs.SCORE") |
1370 ;; ;; All the comp groups in one score file |
1373 ;; ;; All the comp groups in one score file |
1371 ;; ("^comp" "comp.SCORE"))) |
1374 ;; ("^comp" "comp.SCORE"))) |
1372 |
1375 |
1373 ;; (setq imap-log t) |
1376 ;; (setq imap-log t) |
1374 |
1377 |
1375 ;; (setq mail-user-agent 'mh-e-user-agent) |
1378 ;; (setq mail-user-agent 'mh-e-user-agent) |
1376 |
|
1377 ;; `gnus-score-followup-thread' |
|
1378 ;; `gnus-score-followup-article' |
|
1379 |
1379 |
1380 (custom-set-faces '(gnus-summary-cancelled ((t (:foreground "plum" :background nil)))) ) |
1380 (custom-set-faces '(gnus-summary-cancelled ((t (:foreground "plum" :background nil)))) ) |
1381 |
1381 |
1382 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; |
1382 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; |
1383 (message "bbdb") |
1383 (message "bbdb") |