From 8413e9513830181994dba891bcd2c9bc570d7ec3 Mon Sep 17 00:00:00 2001 From: =?utf8?q?Mattias=20Engdeg=C3=A5rd?= Date: Fri, 2 Dec 2022 18:06:00 +0100 Subject: [PATCH] ; server-test CI debugging --- test/lisp/server-tests.el | 6 ++++-- 1 file changed, 4 insertions(+), 2 deletions(-) diff --git a/test/lisp/server-tests.el b/test/lisp/server-tests.el index c7813e2aefc..f08c5bce5d5 100644 --- a/test/lisp/server-tests.el +++ b/test/lisp/server-tests.el @@ -25,8 +25,8 @@ (defconst server-tests/can-create-frames-p (and (not (memq system-type '(windows-nt ms-dos))) - ;; TERM=dumb is what we get when running from `compile'. - (not (equal (getenv "TERM") "dumb"))) + nil + (not (member (getenv "TERM") '("dumb" "" nil)))) "Non-nil if we can create a new frame in the tests. Some tests below need to create new frames for the emacsclient. However, this doesn't work on all platforms. In particular, @@ -119,6 +119,8 @@ process's status matches it." (ert-deftest server-tests/server-start/sets-minor-mode () "Ensure that calling `server-start' also sets `server-mode' properly." + (message "TERM=%S" (getenv "TERM")) + (should nil) (server-tests/with-server ;; Make sure starting the server activates the minor mode. (should (eq server-mode t)) -- 2.39.2