aboutsummaryrefslogtreecommitdiff
path: root/emacs/.emacs.d/init/ycp-gnus.el
diff options
context:
space:
mode:
Diffstat (limited to 'emacs/.emacs.d/init/ycp-gnus.el')
-rw-r--r--emacs/.emacs.d/init/ycp-gnus.el11
1 files changed, 6 insertions, 5 deletions
diff --git a/emacs/.emacs.d/init/ycp-gnus.el b/emacs/.emacs.d/init/ycp-gnus.el
index 6945de1..8485a86 100644
--- a/emacs/.emacs.d/init/ycp-gnus.el
+++ b/emacs/.emacs.d/init/ycp-gnus.el
@@ -30,19 +30,19 @@
(my-setq-from-local user-mail-address user-full-name)
(setq auth-sources '("~/.authinfo.gpg"))
-;;;; `mm-encode'
+;;; `mm-encode'
(my-package mm-encode
(setq mm-encrypt-option nil ; use 'guided if you need more control
mm-sign-option nil)) ; same
-;;;; `mml-sec'
+;;; `mml-sec'
(my-package mml-sec
(setq mml-secure-openpgp-encrypt-to-self t
mml-secure-openpgp-sign-with-sender t
mml-secure-smime-encrypt-to-self t
mml-secure-smime-sign-with-sender t))
-;;;; `message'
+;;; `message'
(my-package message
(setq mail-user-agent 'message-user-agent
message-elide-ellipsis "\n> [... %l lines elided]\n"
@@ -64,7 +64,7 @@
(setq smtpmail-smtp-service 587
smtpmail-queue-mail nil))
-;;;; `sendmail' (mail transfer agent)
+;;; `sendmail' (mail transfer agent)
(setq send-mail-function 'smtpmail-send-it)
;;; gnus
@@ -167,7 +167,7 @@
(setq gnus-treat-display-smileys nil)
(setq gnus-article-x-face-too-ugly ".*")) ; all images in headers are outright
; annoying---disabled!
-;; gnus-desktop-notify
+;;; gnus-desktop-notify
(my-package gnus-desktop-notify
(:delay 30)
(gnus-desktop-notify-mode)
@@ -184,6 +184,7 @@
(bbdb-mua-auto-update-init 'gnus 'message)
(setq bbdb-message-all-addresses t)
(setq bbdb-mua-pop-up-window-size .15)
+ (setq bbdb-new-mails-primary nil)
(setq bbdb-mail-user-agent 'gnus-user-agent)
(setq bbdb-update-records-p 'create)
(setq bbdb-message-clean-mail-function 'my-bbdb-clean-mail)