emacs-31 426dca68493: ; * test/lisp/tab-bar-tests.el (tab-bar-tests-quit-restore-window): Fix it.

Juri Linkov <[email protected]>
Newsgroups gmane.emacs.diffs
Message-ID <[email protected]>
branch: emacs-31
commit 426dca68493f79a339636315d68bfa5ca4c12fc7
Author: Juri Linkov <[email protected]>
Commit: Juri Linkov <[email protected]>

    ; * test/lisp/tab-bar-tests.el (tab-bar-tests-quit-restore-window): Fix it.
---
 test/lisp/tab-bar-tests.el | 9 +++++++++
 1 file changed, 9 insertions(+)

diff --git a/test/lisp/tab-bar-tests.el b/test/lisp/tab-bar-tests.el
index 46aa1f2a845..e0de25bdc39 100644
--- a/test/lisp/tab-bar-tests.el
+++ b/test/lisp/tab-bar-tests.el
@@ -71,6 +71,15 @@
          (pop-up-frame-alist frame-params)
          (frame-auto-hide-function 'delete-frame))
 
+    ;; After commit 293eaf323a0 (bug#81575) 'frame-deletable-p'
+    ;; checks if frames are on the same terminal.  But in this test
+    ;; the first frame F1 is on initial_terminal, but other created
+    ;; frames are on #<terminal 1 on /dev/tty>.  So create a new frame
+    ;; on the same terminal as other created frames, and delete
+    ;; the initial frame that is on another terminal.
+    (make-frame pop-up-frame-alist)
+    (delete-frame (car (last (frame-list))) nil)
+
     ;; 1.1. 'quit-restore-window' should delete the frame
     ;; from initial window (bug#59862)
     (progn
lmpx.com only provides a reader for public news (NNTP) servers. It is not affiliated with the servers or forums shown here and is not responsible for the content of articles, which is written by their respective authors.