summaryrefslogtreecommitdiff
path: root/lisp/gnus/nnheader.el
diff options
context:
space:
mode:
authorSam Steingold <sds@gnu.org>2020-01-10 13:34:59 -0500
committerSam Steingold <sds@gnu.org>2020-01-28 09:47:52 -0500
commit5ee3c37634f7f8651b2da1f4b611334a2b146928 (patch)
tree7f83880cff55aeb346218023c780fbaa9a570857 /lisp/gnus/nnheader.el
parentda7267e889a72edd86896f7487a6a8e4d1216441 (diff)
downloademacs-5ee3c37634f7f8651b2da1f4b611334a2b146928.tar.gz
Make sure that all gnus buffers are killed on exit
* lisp/gnus/gnus-agent.el (gnus-agent-synchronize-flags-server): Use `gnus-get-buffer-create' instead of `get-buffer-create' * lisp/gnus/gnus-bookmark.el (gnus-bookmark-write-file): Likewise. (gnus-bookmark-bmenu-list): Likewise. (gnus-bookmark-show-details): Likewise. * lisp/gnus/gnus-draft.el (gnus-draft-setup): Likewise. * lisp/gnus/gnus-icalendar.el (gnus-icalendar-reply): Likewise. * lisp/gnus/gnus-int.el (gnus-backend-trace): Likewise. * lisp/gnus/gnus-srvr.el (gnus-enter-server-buffer): Likewise. * lisp/gnus/gnus-sum.el (gnus-summary-pipe-output): Likewise. * lisp/gnus/gnus-util.el (gnus-output-to-rmail): Likewise. (gnus-output-to-mail): Likewise. (gnus-multiple-choice): Likewise. * lisp/gnus/mail-source.el (mail-source-call-script): Likewise. * lisp/gnus/message.el (message-cancel-news): Likewise. (message-resend): Likewise. * lisp/gnus/mm-archive.el (mm-dissect-archive): Likewise. * lisp/gnus/mml1991.el (mml1991-mailcrypt-sign): Likewise. (mml1991-mailcrypt-encrypt): Likewise. * lisp/gnus/mml2015.el (mml2015-mailcrypt-verify): Likewise. (mml2015-mailcrypt-clear-verify): Likewise. * lisp/gnus/nnbabyl.el (nnbabyl-request-move-article): Likewise. * lisp/gnus/nndiary.el (nndiary-request-move-article): Likewise. (nndiary-find-group-number): Likewise. (nndiary-open-nov): Likewise. (nndiary-generate-nov-file): Likewise. * lisp/gnus/nndoc.el (nndoc-possibly-change-buffer): Likewise. * lisp/gnus/nndraft.el (nndraft-request-move-article): Likewise. (nndraft-auto-save-file-name): Likewise. * lisp/gnus/nneething.el (nneething-get-head): Likewise. * lisp/gnus/nnfolder.el (nnfolder-request-move-article): Likewise. (nnfolder-open-nov): Likewise. * lisp/gnus/nnheader.el (nnheader-init-server-buffer): Likewise. (nnheader-set-temp-buffer): Likewise. * lisp/gnus/nnimap.el (nnimap-log-buffer): Likewise. * lisp/gnus/nnir.el (nnir-run-swish++): Likewise. (nnir-run-swish-e): Likewise. (nnir-run-hyrex): Likewise. (nnir-run-namazu): Likewise. (nnir-run-notmuch): Likewise. (nnir-run-find-grep): Likewise. * lisp/gnus/nnmail.el (nnmail-split-incoming): Likewise. (nnmail-cache-open): Likewise. (nnmail-log-split): Likewise. * lisp/gnus/nnmaildir.el (nnmaildir--with-work-buffer): Likewise. (nnmaildir--with-nov-buffer): Likewise. (nnmaildir--with-move-buffer): Likewise. * lisp/gnus/nnmairix.el (nnmairix-call-mairix-binary): Likewise. (nnmairix-call-mairix-binary-raw): Likewise. (nnmairix-replace-group-and-numbers): Likewise. * lisp/gnus/nnmbox.el (nnmbox-request-move-article): Likewise. * lisp/gnus/nnmh.el (nnmh-request-move-article): Likewise. * lisp/gnus/nnml.el (nnml-request-move-article): Likewise. (nnml-find-group-number): Likewise. (nnml-get-nov-buffer): Likewise. (nnml-generate-nov-file): Likewise. * lisp/gnus/nnrss.el (nnrss-opml-export): Likewise. * lisp/gnus/nntp.el (nntp-record-command): Likewise. * lisp/gnus/nnvirtual.el (nnvirtual-retrieve-headers): Likewise. * lisp/gnus/smime.el (smime-new-details-buffer): Likewise. (smime-certificate-info): Likewise. (smime): Likewise. * lisp/gnus/spam-stat.el (spam-stat-store-current-buffer): Likewise.
Diffstat (limited to 'lisp/gnus/nnheader.el')
-rw-r--r--lisp/gnus/nnheader.el4
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/gnus/nnheader.el b/lisp/gnus/nnheader.el
index bf3a5c1372a..e124bf1f6a9 100644
--- a/lisp/gnus/nnheader.el
+++ b/lisp/gnus/nnheader.el
@@ -505,7 +505,7 @@ the line could be found."
(defun nnheader-init-server-buffer ()
"Initialize the Gnus-backend communication buffer."
(unless (gnus-buffer-live-p nntp-server-buffer)
- (setq nntp-server-buffer (get-buffer-create " *nntpd*")))
+ (setq nntp-server-buffer (gnus-get-buffer-create " *nntpd*")))
(with-current-buffer nntp-server-buffer
(erase-buffer)
(mm-enable-multibyte)
@@ -630,7 +630,7 @@ the line could be found."
(defun nnheader-set-temp-buffer (name &optional noerase)
"Set-buffer to an empty (possibly new) buffer called NAME with undo disabled."
- (set-buffer (get-buffer-create name))
+ (set-buffer (gnus-get-buffer-create name))
(buffer-disable-undo)
(unless noerase
(erase-buffer))