diff options
author | Sam Steingold <sds@gnu.org> | 2020-01-30 11:27:55 -0500 |
---|---|---|
committer | Sam Steingold <sds@gnu.org> | 2020-01-30 11:28:30 -0500 |
commit | 38b6ed1edc9978d3fb7ecd5df2afa81c6064f3c9 (patch) | |
tree | 6b84462a96ca304631bc16138c85dbb55d1dba9d /lisp/gnus/mml2015.el | |
parent | 1ed7cd41dba444da0b66427eb48852e896ca3742 (diff) | |
download | emacs-38b6ed1edc9978d3fb7ecd5df2afa81c6064f3c9.tar.gz |
prune the overly cavalier "kill all gnus buffers exit"
* lisp/gnus/mail-source.el (mail-source-call-script): Require gnus for
`gnus-get-buffer-create', following the pattern in the file.
* lisp/gnus/message.el: Autoload `gnus-get-buffer-create'.
* lisp/gnus/mm-archive.el: Likewise.
* lisp/gnus/mml2015.el: Likewise (the file autoloads other gnus functions).
* lisp/gnus/nnheader.el: Likewise.
* lisp/gnus/mml1991.el (mml1991-mailcrypt-sign, mml1991-mailcrypt-encrypt):
Revert the patch, use `get-buffer-create' instead of `gnus-get-buffer-create'.
* lisp/gnus/smime.el (smime-new-details-buffer, smime):
smime-certificate-info): Likewise.
* lisp/gnus/spam-stat.el (spam-stat-store-current-buffer): Likewise.
Diffstat (limited to 'lisp/gnus/mml2015.el')
-rw-r--r-- | lisp/gnus/mml2015.el | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/lisp/gnus/mml2015.el b/lisp/gnus/mml2015.el index 1c4213d888e..d1d150ad2ee 100644 --- a/lisp/gnus/mml2015.el +++ b/lisp/gnus/mml2015.el @@ -293,6 +293,8 @@ If set, it overrides the setting of `mml2015-sign-with-sender'." (substring alg (match-end 0)) alg)))) +(autoload 'gnus-get-buffer-create "gnus") + (defun mml2015-mailcrypt-verify (handle ctl) (catch 'error (let (part) @@ -725,6 +727,8 @@ If set, it overrides the setting of `mml2015-sign-with-sender'." (autoload 'epg-expand-group "epg-config") (autoload 'epa-select-keys "epa") +(autoload 'gnus-create-image "gnus-util") + (defun mml2015-epg-key-image (key-id) "Return the image of a key, if any." (with-temp-buffer @@ -949,7 +953,6 @@ If set, it overrides the setting of `mml2015-sign-with-sender'." ;;; General wrapper (autoload 'gnus-buffer-live-p "gnus-util") -(autoload 'gnus-get-buffer-create "gnus") (defun mml2015-clean-buffer () (if (gnus-buffer-live-p mml2015-result-buffer) |