dotfiles/.gnus.el
Lucien Cartier-Tilet 6e15c5a232
Split dotspacemacs, edited editing style, removed unused packages
I removed my gnus configuration from my dotspacemacs file and put it into my
~/.gnus.el file.

I also added variables to my hybrid editing style for Spacemacs, and some
packages that were either redundant (e.g. explicit cmake-mode) or unused (e.g.
dionysos) were removed.
2019-11-09 18:42:15 +01:00

40 lines
1.7 KiB
EmacsLisp

(defun my-gnus-group-list-subscribed-groups ()
"List all subscribed groups with or without un-read messages"
(interactive)
(gnus-group-list-all-groups 5))
;; get email, store in nnml
(setq gnus-secondary-select-methods '((nnimap "lucien@phundrak.com"
(nnimap-address "mail.phundrak.com")
(nnimap-server-port 143)
(nnimap-stream starttls)))
;; send email via 1and1
message-send-mail-function 'smtpmail-send-it
smtpmail-smtp-server "mail.phundrak.com"
smtpmail-stream-type 'starttls
smtpmail-smtp-service 587
;; archive outgoing emails in Sent folder on imap.1and1.fr
gnus-message-archive-method '(nnimap "mail.phundrak.com")
gnus-message-archive-group "Sent"
;; store email in ~/Mails directory
nnml-directory "~/Mails"
message-directory "~/Mails"
gnus-fetch-old-headers 'some
mm-discouraged-alternatives '("text/html" "text/richtext")
mm-text-html-renderer 'w3m
gnus-use-cache t)
(gnus-add-configuration
'(article (horizontal 1.0 (summary .4 point) (article 1.0))))
(eval-after-load 'gnus-topic
'(progn
(setq gnus-message-archive-group '((format-time-string "sent.%Y")))
(setq gnus-topic-topology '(("Gnus" visible)
(("lucien@phundrak.com" visible nil nil))))
(setq gnus-topic-alist '(("lucien@phundrak.com" ; the key of the topic
"nnimap+lucien@phundrak.com:INBOX"
"nnimap+lucien@phundrak.com:Sent"
"nnimap+lucien@phundrak.com:Drafts")
("Gnus")))))