mirror of
https://git.savannah.gnu.org/git/emacs.git
synced 2026-09-10 07:46:51 -04:00
Port tab-bar-tests to Solaris
* test/lisp/tab-bar-tests.el (tab-bar-tests-quit-restore-window): Test tty-type "linux" only on gnu/linux, as it may not exist on other platforms, e.g., Solaris (bug#81477).
This commit is contained in:
parent
7904066fb7
commit
8cfcc3cb00
|
|
@ -54,17 +54,15 @@
|
|||
(ert-deftest tab-bar-tests-quit-restore-window ()
|
||||
:tags '(:unstable) ; Can hang.
|
||||
(skip-when (pcase system-type
|
||||
;; Skip test on MS-Windows in batch mode, since terminal
|
||||
;; frames cannot be created in that case.
|
||||
('windows-nt noninteractive)
|
||||
;; This test is unreliable on macOS when run in batch mode
|
||||
;; from Emacs (M-x compile).
|
||||
('darwin (equal (getenv "TERM") "dumb"))
|
||||
;; Emba runs the container without "--tty"
|
||||
;; (the environment variable "TERM" is nil), and this
|
||||
;; test fails with '(error "Could not open file: /dev/tty")'.
|
||||
;; Therefore skip it unless it can use '(tty-type . "linux")'.
|
||||
('gnu/linux (null (getenv "TERM")))))
|
||||
('gnu/linux (null (getenv "TERM")))
|
||||
;; Skip in batch mode, since the tty-type "linux"
|
||||
;; might not work on other platforms, and on MS-Windows
|
||||
;; terminal frames cannot be created in batch mode anyway.
|
||||
(_ noninteractive)))
|
||||
|
||||
(let* ((frame-params (when noninteractive
|
||||
'((window-system . nil)
|
||||
|
|
|
|||
Loading…
Reference in a new issue