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/mail-source.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/mail-source.el')
| -rw-r--r-- | lisp/gnus/mail-source.el | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/lisp/gnus/mail-source.el b/lisp/gnus/mail-source.el index bda321fcc48..f5b68789b85 100644 --- a/lisp/gnus/mail-source.el +++ b/lisp/gnus/mail-source.el @@ -740,7 +740,9 @@ Deleting old (> %s day(s)) incoming mail file `%s'." diff bfile) (when delay (sleep-for delay))) +(declare-function gnus-get-buffer-create "gnus" (name)) (defun mail-source-call-script (script) + (require 'gnus) (let ((background nil) (stderr (gnus-get-buffer-create " *mail-source-stderr*")) result) |