summaryrefslogtreecommitdiff
path: root/gnu/tests
diff options
context:
space:
mode:
authormuradm <[email protected]>2025-01-20 00:24:03 +0100
committerLudovic Courtès <[email protected]>2025-01-20 00:25:47 +0100
commitbc6769f1211104dbc9341c064275cd930f5dfa3a (patch)
treeb849dafd1f5f813279b0cc44b1c6673a0d19a3e2 /gnu/tests
parent82317da3de53b96026f5003707ab60cc8bd46664 (diff)
tests: minimal-desktop: Adjust to greetd 0.10.3.
This is a followup to 55cead2c49e0740c1595fdc5ecce7d050c36e080. * gnu/tests/desktop.scm (run-minimal-desktop-test): Do not check for ‘GREETD_SOCK’. Change-Id: I2eb5af947ee1753d6237c95feb3cea7ed98f90ad Signed-off-by: Ludovic Courtès <[email protected]>
Diffstat (limited to 'gnu/tests')
-rw-r--r--gnu/tests/desktop.scm6
1 files changed, 3 insertions, 3 deletions
diff --git a/gnu/tests/desktop.scm b/gnu/tests/desktop.scm
index ef30442886..1c32076ccb 100644
--- a/gnu/tests/desktop.scm
+++ b/gnu/tests/desktop.scm
@@ -244,14 +244,14 @@ minimal %BASE-SERVICES."
(sort (filter expected-var user-env) string<?)))
- (test-assert "validate SEATD_SOCK and GREETD_SOCK"
+ (test-assert "validate SEATD_SOCK"
(begin
(marionette-type "env > env\n" marionette)
(sleep 1)
(define (sock-var? var)
(any (lambda (s) (string-contains var s))
- '("SEATD_SOCK" "GREETD_SOCK")))
+ '("SEATD_SOCK")))
(define (sock-var-sock var)
(car (cdr (string-split var #\=))))
@@ -262,7 +262,7 @@ minimal %BASE-SERVICES."
(out (filter sock-var? out))
(socks (map sock-var-sock out))
(socks (map wait-for-unix-socket-m socks)))
- (and (= 2 (length socks)) (every identity socks)))))
+ (and (= 1 (length socks)) (every identity socks)))))
(test-equal "seatd.sock ownership"
'("root" "seat")