martin/emacs
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Fix regression in 'todo-test-todo-quit02'

Browse Source 
* lisp/window.el (switch-to-prev-buffer): If BURY-OR-KILL is
non-nil, remove any 'quit-restore' or 'quit-restore-prev'
parameter referencing the old buffer too.  This fixes a
regression when running 'todo-test-todo-quit02' from 'ert'
(reported by Andrea Corallo <acorallo@gnu.org>).
This commit is contained in:
Martin Rudalics
2024-08-01 18:04:20 +02:00
parent 889e7027d3
commit 0892b66e9b
1 changed files with 4 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files

7
lisp/window.el
View File

@@ -4799,9 +4799,10 @@ This function is called by `previous-buffer'."
(if bury-or-kill
(let ((entry (and (eq bury-or-kill 'append)
(assq old-buffer (window-prev-buffers window)))))
;; Remove `old-buffer' from WINDOW's previous and (restored list
;; of) next buffers.
(unrecord-window-buffer window old-buffer)
;; Remove `old-buffer' from WINDOW's previous and (restored
;; list of) next buffers and also from its 'quit-restore' and
;; 'quit-restore-prev' parameters.
(unrecord-window-buffer window old-buffer t)
(when entry
;; Append old-buffer's entry to list of WINDOW's previous
;; buffers so it's less likely to get switched to soon but