From ebc213b2bac3b4e8681e0acb246dbe97c94e05fa Mon Sep 17 00:00:00 2001 From: Alan Pearce Date: Wed, 30 Aug 2017 14:59:38 +0200 Subject: Emacs: Remove gnus configuration --- emacs/.emacs.d/ap-spotcap.local.el.gpg | Bin 1333 -> 0 bytes emacs/.emacs.d/main.el | 43 ++++----------------------------- 2 files changed, 5 insertions(+), 38 deletions(-) delete mode 100644 emacs/.emacs.d/ap-spotcap.local.el.gpg (limited to 'emacs') diff --git a/emacs/.emacs.d/ap-spotcap.local.el.gpg b/emacs/.emacs.d/ap-spotcap.local.el.gpg deleted file mode 100644 index 1751ca5..0000000 Binary files a/emacs/.emacs.d/ap-spotcap.local.el.gpg and /dev/null differ diff --git a/emacs/.emacs.d/main.el b/emacs/.emacs.d/main.el index ce9ee4b..2dc39d3 100644 --- a/emacs/.emacs.d/main.el +++ b/emacs/.emacs.d/main.el @@ -1340,22 +1340,9 @@ ;; #+END_SRC ;; ** Mail -;; *** Gnus - -;; At work, I use gnus for email. Some of the setup is specific to my -;; workplace, so I keep it in a host-specific, GPG-encrypted file. +;; *** Basics ;; #+BEGIN_SRC emacs-lisp -(use-package gnus - :config (progn - (setq gnus-gcc-mark-as-read t - mml-secure-openpgp-encrypt-to-self t - send-mail-function #'smtpmail-send-it - message-send-mail-function #'smtpmail-send-it))) - -(with-eval-after-load "gnus-mime" - (define-key gnus-mime-button-map " " #'gnus-mime-view-part-externally)) - (with-eval-after-load "mailcap" (when (eq system-type 'darwin) (mailcap-add-mailcap-entry "application" "pdf" '((viewer . "/usr/bin/qlmanage -p %s") (type . "application/pdf"))))) @@ -1363,6 +1350,9 @@ (with-eval-after-load "mm-decode" (add-to-list 'mm-discouraged-alternatives "text/html") (add-to-list 'mm-discouraged-alternatives "text/richtext")) + +(with-eval-after-load "mml-sec" + (setq mml-secure-openpgp-encrypt-to-self t)) ;; #+END_SRC ;; *** mu @@ -1418,26 +1408,6 @@ "alan@alanpearce.co.uk"))))) ;; #+END_SRC -;; *** BBDB - -;; As I'm using Emacs for email, it makes sense to have contact -;; information here as well. - -;; #+BEGIN_SRC emacs-lisp -(use-package bbdb - :config (progn - (bbdb-initialize 'gnus 'message 'pgp) - (bbdb-mua-auto-update-init 'gnus 'message) - (setq bbdb-send-mail-style 'gnus - bbdb-complete-mail-allow-cycling t - bbdb-mua-auto-update t - bbdb-mua-pop-up-window-size 3 - bbdb-mua-update-interactive-p '(query . create) - bbdb-message-all-addresses t - bbdb-offer-save t - bbdb-offer-to-create 1))) -;; #+END_SRC - ;; ** Misc ;; #+BEGIN_SRC emacs-lisp @@ -2674,10 +2644,7 @@ (use-package ace-link :after avy :config (progn - (ace-link-setup-default) - (with-eval-after-load "gnus" - (bind-key "M-o" #'ace-link-gnus gnus-summary-mode-map) - (bind-key "M-o" #'ace-link-gnus gnus-article-mode-map)))) + (ace-link-setup-default))) ;; #+END_SRC ;; *** goto-chg -- cgit 1.4.1