When showing the user some details of gnupg output, ensure that those
details are shown at the end of the gnupg status buffer
("*notmuch-crypto-gpg-out*"), otherwise it can end up mixed up with
earlier output.
(window (display-buffer buffer t nil)))
(with-selected-window window
(with-current-buffer buffer
+ (goto-char (point-max))
(call-process "gpg" nil t t "--list-keys" fingerprint))
(recenter -1))))
(window (display-buffer buffer t nil)))
(with-selected-window window
(with-current-buffer buffer
+ (goto-char (point-max))
(call-process "gpg" nil t t "--recv-keys" keyid)
(insert "\n")
(call-process "gpg" nil t t "--list-keys" keyid))