Created
July 24, 2009 22:17
-
-
Save anonymous/154583 to your computer and use it in GitHub Desktop.
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
(setq user-mail-address "volh@ginnungagap.in.ua") | |
(setq user-full-name "Roman Semenenko") | |
(setq gnus-select-method '(nnmaildir "private" (directory "~/mail/") (target-prefix "~/mail/") (expire-age never))) | |
(setq gnus-message-archive-method "nnmaildir") | |
(setq mail-specify-envelope-from t) (setq mail-envelope-from 'header)(setq sendmail-program "/usr/sbin/sendmail") | |
; Enable syntax highlighting | |
(toggle-global-lazy-font-lock-mode) | |
'(fontset-default-styles (quote (bold demibold italic oblique bold-italic bold-oblique demibold-italic demibold-oblique))) | |
'(message-signature-file "~/.signature") | |
;; Add topic mode | |
(add-hook 'gnus-startup-hook 'gnus-topic-mode) | |
;; Turn on adaptive scoring | |
(setq gnus-use-adaptive-scoring '(line)) | |
;; Turn on rendering via w3m | |
(require 'w3m-load) | |
(setq mm-text-html-renderer 'w3m) | |
;; Sort by score | |
(setq gnus-thread-sort-functions | |
'(gnus-thread-sort-by-subject | |
(not gnus-thread-sort-by-date) | |
gnus-thread-sort-by-total-score)) | |
;; Layout of Gnus frame | |
(gnus-add-configuration | |
'(article | |
(vertical 0.25 | |
(horizontal 0.3 | |
(group 0.3) | |
(summary 1.0 point)) | |
(horizontal 1.0 | |
(article 1.0))))) | |
(gnus-add-configuration | |
'(summary | |
(horizontal 0.25 | |
(vertical 0.3 | |
(group 1.0)) | |
(vertical 1.0 | |
(summary 1.0 point))))) | |
;; Adaptive scoring weights | |
(setq gnus-default-adaptive-score-alist | |
'((gnus-unread-mark) | |
(gnus-ticked-mark (from 4)) | |
(gnus-dormant-mark (from 7)) | |
(gnus-del-mark (from -4) (subject -15)) | |
(gnus-read-mark (from 5) (subject 30)) | |
(gnus-expirable-mark (from -3) (subject -3)) | |
(gnus-killed-mark (from -4) (subject -20)) | |
(gnus-kill-file-mark) | |
(gnus-ancient-mark (subject -10)) | |
(gnus-low-score-mark) | |
(gnus-catchup-mark (from -1) (subject -10)))) | |
(setq | |
gnus-thread-hide-subtree t | |
gnus-suppress-duplicates t) |
Sign up for free
to join this conversation on GitHub.
Already have an account?
Sign in to comment