summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorMaxim Cournoyer <maxim.cournoyer@gmail.com>2022-03-11 16:29:50 -0500
committerMaxim Cournoyer <maxim.cournoyer@gmail.com>2022-03-19 11:08:30 -0400
commit947b8f99d445b0e388c9a90ffd17c8ce0f8bcfd1 (patch)
treec291f316114b9d7a404dc4c973e5eb02c2626f4a
parent55a680a6469369ac89cef958dac72080aaa4f9ad (diff)
downloadguix-patches-947b8f99d445b0e388c9a90ffd17c8ce0f8bcfd1.tar
guix-patches-947b8f99d445b0e388c9a90ffd17c8ce0f8bcfd1.tar.gz
tests: install: Adjust the timeouts on two failing tests.
The 'login on tty1' and 'getlogin on tty1' tests were failing on a machine equipped with slower hard drives. * gnu/tests/base.scm (run-basic-test) ["login on tty1", "getlogin on tty1"]: Bump timeout from 10 to 30 s.
-rw-r--r--gnu/tests/base.scm6
1 files changed, 4 insertions, 2 deletions
diff --git a/gnu/tests/base.scm b/gnu/tests/base.scm
index 38d4317e52..cfaa736aec 100644
--- a/gnu/tests/base.scm
+++ b/gnu/tests/base.scm
@@ -346,7 +346,8 @@ info --version")
;; It can take a while before the shell commands are executed.
(marionette-eval '(use-modules (rnrs io ports)) marionette)
(wait-for-file "/root/logged-in" marionette
- #:read 'get-string-all)))
+ #:read 'get-string-all
+ #:timeout 30)))
(test-equal "getlogin on tty1"
"\"root\""
@@ -360,7 +361,8 @@ info --version")
;; It can take a while before the shell commands are executed.
(marionette-eval '(use-modules (rnrs io ports)) marionette)
(wait-for-file "/root/login-id" marionette
- #:read 'get-string-all)))
+ #:read 'get-string-all
+ #:timeout 30)))
;; There should be one utmpx entry for the user logged in on tty1.
(test-equal "utmpx entry"