mirror of
https://github.com/doomemacs/doomemacs
synced 2025-08-03 12:27:26 -05:00
feature/popup: possible fix for elusive 'at top level' bug
Occasionally, a keyboard-quit bubbles up from popup's buffer cleanup process, causing all kinds of havoc; like killed term buffers (#436), abrupt interrupting of the minibuffer, and the point jumping around. This tries to fix this, but needs more testing!
This commit is contained in:
@ -14,6 +14,7 @@
|
||||
"Tries to kill BUFFER, as was requested by a transient timer. If it fails, eg.
|
||||
the buffer is visible, then set another timer and try again later."
|
||||
(when (buffer-live-p buffer)
|
||||
(with-temp-buffer
|
||||
(let ((kill-buffer-hook (remq '+popup|kill-buffer-hook kill-buffer-hook)))
|
||||
(cond ((eq ttl 0)
|
||||
(kill-buffer buffer))
|
||||
@ -25,7 +26,7 @@ the buffer is visible, then set another timer and try again later."
|
||||
(let (confirm-kill-processes)
|
||||
(when-let* ((process (get-buffer-process (current-buffer))))
|
||||
(kill-process process)))
|
||||
(kill-buffer buffer)))))))
|
||||
(kill-buffer buffer))))))))
|
||||
|
||||
(defun +popup--init (window &optional alist)
|
||||
"Initializes a popup window. Run any time a popup is opened. It sets the
|
||||
|
Reference in New Issue
Block a user