diff options
| -rw-r--r-- | custom/jao-custom-email.el | 46 | ||||
| -rw-r--r-- | custom/jao-custom-gnus.el | 2 |
2 files changed, 47 insertions, 1 deletions
diff --git a/custom/jao-custom-email.el b/custom/jao-custom-email.el index 45fda21..c985917 100644 --- a/custom/jao-custom-email.el +++ b/custom/jao-custom-email.el @@ -235,6 +235,52 @@ ;; (setq mm-text-html-renderer #'jao-w3m-html-renderer) (setq mm-text-html-renderer #'jao-shr-html-renderer) +;;; bbdb +(use-package bbdb + :ensure t + :init (setq bbdb-complete-name-allow-cycling t + bbdb-completion-display-record nil + bbdb-gui t + bbdb-message-all-addresses t + bbdb-complete-mail-allow-cycling t + bbdb-north-american-phone-numbers-p nil + bbdb-add-aka t + bbdb-add-name 2 + bbdb-message-all-addresses t + bbdb-mua-pop-up t ;; 'horiz + bbdb-mua-pop-up-window-size 0.3 + bbdb-layout 'multi-line + bbdb-mua-update-interactive-p '(query . create) + bbdb-mua-auto-update-p 'bbdb-select-message + bbdb-user-mail-address-re jao-mails-regexp + bbdb-auto-notes-ignore-headers + `(("From" . ,jao-mails-regexp) + ("From" . ".*@.*github\.com.*") + ("To" . ".*@.*github\.com.*") + ("Reply-to" . ".*") + ("References" . ".*")) + bbdb-auto-notes-ignore-messages + `(("To" . ".*@.*github\\.com.*") + ("From" . ".*@.*github\\.com.*") + ("From" . "info-list") + ("From" . "no-?reply\\|deploy") + ("X-Mailer" . "MailChimp")) + bbdb-accept-message-alist + `(("To" . ,jao-mails-regexp) + ("Cc" . ,jao-mails-regexp) + ("BCc" . ,jao-mails-regexp)) + bbdb-ignore-message-alist bbdb-auto-notes-ignore-messages) + :config + (add-hook 'message-setup-hook 'bbdb-mail-aliases) + ;; (add-hook 'bbdb-notice-mail-hook 'bbdb-auto-notes) + (add-hook 'bbdb-after-change-hook (lambda (arg) (bbdb-save))) + (require 'bbdb-anniv) ;; BBDB 3.x this gets birthdays in org agenda and diary + (add-hook 'diary-list-entries-hook 'bbdb-anniv-diary-entries) + + (setq bbdb-file (expand-file-name "~/.emacs.d/bbdb")) + (if jao-notmuch-enabled + (bbdb-initialize 'message 'pgp) + (bbdb-initialize 'message 'pgp 'gnus))) ;;; narrowing (defvar jao-mail-consult-buffer-history nil) diff --git a/custom/jao-custom-gnus.el b/custom/jao-custom-gnus.el index ab19fd5..48159ac 100644 --- a/custom/jao-custom-gnus.el +++ b/custom/jao-custom-gnus.el @@ -692,7 +692,7 @@ ;;;; bbdb (with-eval-after-load "bbdb" - (bbdb-initialize 'gnus 'message 'pgp 'mail) + ;; (bbdb-initialize 'gnus 'message 'pgp) (bbdb-mua-auto-update-init 'gnus) (with-eval-after-load "gnus-sum" (define-key gnus-summary-mode-map ":" 'bbdb-mua-annotate-sender) |