* test/lisp/tab-bar-tests.el (tab-bar-tests-quit-restore-window): Fix.

Select the created frame because 'quit-window' unexpectedly
selects the original frame (https://debbugs.gnu.org/71386#262).
Add a comment about the `message' call bound to the original frame.
https://lists.gnu.org/archive/html/emacs-devel/2025-04/msg00546.html
This commit is contained in:
Juri Linkov 2025-04-16 09:23:35 +03:00
parent 6f1e317764
commit 864bc762a2

View file

@ -89,12 +89,16 @@
(should (eq (length (window-list)) 2))
(should (equal (buffer-name) "*info*"))
(quit-window)
;; 'quit-window' unexpectedly selects the original frame,
;; so move back to the created frame
(select-frame (car (frame-list)))
(should (eq (length (window-list)) 1))
(should (eq (length (frame-list)) 2))
;; FIXME: uncomment (should (equal (buffer-name) "*Messages*"))
(should (equal (buffer-name) "*Messages*"))
(quit-window)
(should (eq (length (frame-list)) 2))
;; Clean up the frame afterwards
;; Delete the created frame afterwards because with tty frames
;; the output of 'message' is bound to the original frame
(delete-frame))
;; 2.1. 'quit-restore-window' should close the tab