mirror of
https://git.savannah.gnu.org/git/emacs.git
synced 2026-09-11 08:16:37 -04:00
Check for a live buffer in 'quit-restore-window'
* lisp/window.el (quit-restore-window): Check with 'buffer-live-p' when finding a prev buffer in 'window-prev-buffers' (bug#81370).
This commit is contained in:
parent
0748af27c0
commit
549d2f8637
|
|
@ -5432,7 +5432,8 @@ elsewhere. This value is used by `quit-windows-on'."
|
|||
(quit-restore-prev-2 (nth 2 quit-restore-prev))
|
||||
(prev-buffer (catch 'prev-buffer
|
||||
(dolist (buf (window-prev-buffers window))
|
||||
(unless (eq (car buf) buffer)
|
||||
(when (and (not (eq (car buf) buffer))
|
||||
(buffer-live-p (car buf)))
|
||||
(throw 'prev-buffer (car buf))))))
|
||||
(dedicated (window-dedicated-p window))
|
||||
(frame (window-frame window))
|
||||
|
|
|
|||
Loading…
Reference in a new issue