chore(emacs.d): Remove GPG agent warmup from mail sending
Fetching credentials is no longer handled by msmtp itself.
This commit is contained in:
parent
39aa74ed61
commit
cf9dd380f3
2 changed files with 0 additions and 17 deletions
|
@ -138,15 +138,6 @@
|
||||||
:sort t
|
:sort t
|
||||||
:action #'magit-status))
|
:action #'magit-status))
|
||||||
|
|
||||||
(defun warmup-gpg-agent (arg &optional exit)
|
|
||||||
"Function used to warm up the GPG agent before use. This is
|
|
||||||
useful in cases where there is no easy way to make pinentry run
|
|
||||||
in the correct context (such as when sending email)."
|
|
||||||
(interactive)
|
|
||||||
(message "Warming up GPG agent")
|
|
||||||
(epg-sign-string (epg-make-context) "dummy")
|
|
||||||
nil)
|
|
||||||
|
|
||||||
(defun bottom-right-window-p ()
|
(defun bottom-right-window-p ()
|
||||||
"Determines whether the last (i.e. bottom-right) window of the
|
"Determines whether the last (i.e. bottom-right) window of the
|
||||||
active frame is showing the buffer in which this function is
|
active frame is showing the buffer in which this function is
|
||||||
|
|
|
@ -48,14 +48,6 @@
|
||||||
;; handle that gracefully.
|
;; handle that gracefully.
|
||||||
(define-key notmuch-message-mode-map (kbd "C-x C-s") #'ignore)
|
(define-key notmuch-message-mode-map (kbd "C-x C-s") #'ignore)
|
||||||
|
|
||||||
;; MSMTP decrypts passwords using pass, but pinentry doesn't work
|
|
||||||
;; correctly in that setup. This forces a warmup of the GPG agent
|
|
||||||
;; before sending the message.
|
|
||||||
;;
|
|
||||||
;; Note that the sending function is advised because the provided hook
|
|
||||||
;; for this seems to run at the wrong time.
|
|
||||||
(advice-add 'notmuch-mua-send-common :before 'warmup-gpg-agent)
|
|
||||||
|
|
||||||
;; Define a telephone-line segment for displaying the count of unread,
|
;; Define a telephone-line segment for displaying the count of unread,
|
||||||
;; important mails in the last window's mode-line:
|
;; important mails in the last window's mode-line:
|
||||||
(defvar *last-notmuch-count-redraw* 0)
|
(defvar *last-notmuch-count-redraw* 0)
|
||||||
|
|
Loading…
Reference in a new issue