From 1f07b37c9ce5450f400ce8a00fdedcd37960f3ac Mon Sep 17 00:00:00 2001 From: Henrik Lissner Date: Wed, 13 Jun 2018 23:25:40 +0200 Subject: [PATCH] Fix elusive back-to-top-level error These occurred because of disruptive kill-buffer-hooks running when the backtrace buffer was auto-killed by the popup cleanup system. No more! --- modules/ui/popup/autoload.el | 11 ++++++----- 1 file changed, 6 insertions(+), 5 deletions(-) diff --git a/modules/ui/popup/autoload.el b/modules/ui/popup/autoload.el index b1fc35021..2d8f54777 100644 --- a/modules/ui/popup/autoload.el +++ b/modules/ui/popup/autoload.el @@ -97,11 +97,12 @@ the buffer is visible, then set another timer and try again later." ((eq ttl 0) (kill-buffer buffer)) ((with-demoted-errors "Error killing transient buffer: %s" - (let (confirm-kill-processes) - (when-let* ((process (get-buffer-process buffer))) - (kill-process process)) - (let (kill-buffer-hook kill-buffer-query-functions) - (kill-buffer buffer))))))))) + (with-current-buffer buffer + (let (confirm-kill-processes) + (when-let* ((process (get-buffer-process buffer))) + (kill-process process)) + (let (kill-buffer-hook kill-buffer-query-functions) + (kill-buffer buffer)))))))))) (defun +popup--init (window &optional alist) "Initializes a popup window. Run any time a popup is opened. It sets the