equal
deleted
inserted
replaced
1199 (setq gnus-article-time-format "%Y-%m-%d %T%z %a") |
1199 (setq gnus-article-time-format "%Y-%m-%d %T%z %a") |
1200 (defun my-gnus-open-article-hook () |
1200 (defun my-gnus-open-article-hook () |
1201 (gnus-article-date-user) |
1201 (gnus-article-date-user) |
1202 ) |
1202 ) |
1203 (add-hook 'gnus-article-prepare-hook 'my-gnus-open-article-hook) |
1203 (add-hook 'gnus-article-prepare-hook 'my-gnus-open-article-hook) |
|
1204 |
|
1205 ;; Scoring, adaptive score. |
|
1206 (setq |
|
1207 gnus-show-threads t |
|
1208 gnus-thread-sort-functions 'gnus-thread-sort-by-total-score |
|
1209 gnus-use-adaptive-scoring t |
|
1210 ) |
|
1211 (setq gnus-default-adaptive-score-alist |
|
1212 '( |
|
1213 (gnus-unread-mark) |
|
1214 (gnus-ticked-mark (subject 5)) |
|
1215 (gnus-dormant-mark (subject 5)) |
|
1216 (gnus-del-mark (subject -1)) |
|
1217 (gnus-killed-mark (subject -5)) |
|
1218 (gnus-catchup-mark (subject -1)) |
|
1219 )) |
1204 |
1220 |
1205 ;; (setq mail-user-agent 'mh-e-user-agent) |
1221 ;; (setq mail-user-agent 'mh-e-user-agent) |
1206 |
1222 |
1207 ;; (add-hook 'message-sent-hook 'gnus-score-followup-thread) |
1223 ;; (add-hook 'message-sent-hook 'gnus-score-followup-thread) |
1208 ;; `gnus-score-followup-thread' |
1224 ;; `gnus-score-followup-thread' |