summaryrefslogtreecommitdiffstats
path: root/.emacs.d/gnus.el
blob: 3074aaeb68dd9765639ed01e14abc448edcea79a (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
(setq gnus-select-method '(nntp "news.eternal-september.org"))
(setq gnus-secondary-select-methods
      '((nnmaildir "gmail"
                   (directory "~/documents/mail/gmail/"))
        (nnmaildir "arch"
                   (directory "~/documents/mail/arch/"))
        (nnmaildir "aethon"
                   (directory "~/documents/mail/aethon/"))
        (nntp "news.gmane.org")
        (nnrss "")))

(setq gnus-auto-subscribed-groups nil)
(setq gnus-save-newsrc-file nil)
(setq gnus-read-newsrc-file nil)
(setq gnus-novice-user t)
(setq gnus-article-truncate-lines nil)

(setq gnus-parameters
      '(("gmail"
         (display . all))
        ("aethon"
         (display . all)
        ("arch"
         (display . all)))))

(setq gnus-permanently-visible-groups
      "\\(gmail\\|aethon\\|arch\\):INBOX")

(setq nntp-marks-is-evil t)

(setq gnus-check-new-newsgroups nil)

(setq gnus-posting-styles
      '((".*"  (address "ryuslash@gmail.com"))
        ("arch:" (address "tom.willemsen@archlinux.us"))
        ("aethon:"
         (address "thomas@aethon.nl")
         (signature-file "~/documents/work/aethon/signature.txt"))))

(setq user-mail-address "ryuslash@gmail.com")
(setq user-full-name "Tom Willemsen")

(load "tls")

(setq send-mail-function 'smtpmail-send-it
      message-send-mail-function 'message-smtpmail-send-it
      starttls-use-gnutls t
      smtpmail-gnutls-credentials '(("smtp.gmail.com" 587 "ryuslash@gmail.com" nil))
      smtpmail-starttls-credentials '(("smtp.gmail.com" 587 "ryuslash@gmail.com" nil))
      smtpmail-smtp-server "smtp.gmail.com"
      smtpmail-smtp-service 587
      smtpmail-debug-info t
      smtpmail-default-smtp-server "smtp.gmail.com")

(add-hook 'gnus-group-mode-hook 'gnus-topic-mode)

;;; BBDB
(require 'bbdb)
(bbdb-initialize 'gnus 'message)
(bbdb-insinuate-gnus)