From 8b310793d2b7d3cf5b3a5301423640dcf68e2528 Mon Sep 17 00:00:00 2001 From: Ludovic Courtès Date: Wed, 15 May 2019 12:09:48 +0200 Subject: tests: 'getlogin' test creates its file atomically. Previously we could end up reading an empty /root/login-id file. * gnu/tests/base.scm (run-basic-test)["getlogin on tty1"]: Create /root/login-id atomically. --- gnu/tests/base.scm | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) diff --git a/gnu/tests/base.scm b/gnu/tests/base.scm index d578f1977a..cf942fe5e1 100644 --- a/gnu/tests/base.scm +++ b/gnu/tests/base.scm @@ -311,7 +311,9 @@ (define (user-owned? file) "\"root\"" (begin ;; Assume we logged in in the previous test and type. - (marionette-type "guile -c '(write (getlogin))' > /root/login-id\n" + (marionette-type "guile -c '(write (getlogin))' > /root/login-id.tmp\n" + marionette) + (marionette-type "mv /root/login-id{.tmp,}\n" marionette) ;; It can take a while before the shell commands are executed. -- cgit v1.2.3