From: Mattias Engdegård <mattiase@acm.org>
Date: Fri, 2 Dec 2022 17:06:00 +0000 (+0100)
Subject: ; server-test CI debugging
X-Git-Tag: emacs-29.0.90~1372
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=8413e95138;p=emacs.git

; server-test CI debugging
---

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))