09/09: tests: docker: Relax marionette timeout.

[guix-commits]

apteryx pushed a commit to branch master
in repository guix.

commit 14518fcc54b4172389a0c733a7b734e4bed94405
Author: Maxim Cournoyer <maxim.cournoyer@gmail.com>
AuthorDate: Fri Jun 24 00:43:23 2022 -0400

    tests: docker: Relax marionette timeout.
    
    The tests would otherwise fail on an old desktop.
    
    * gnu/tests/docker.scm (run-docker-test)
    <make-marionette>: Specify a timeout of 60 s.
    (run-docker-system-test) <make-marionette>: Likewise.
---
 gnu/tests/docker.scm | 6 ++++--
 1 file changed, 4 insertions(+), 2 deletions(-)

diff --git a/gnu/tests/docker.scm b/gnu/tests/docker.scm
index 6302bd0727..3e780d8a60 100644
--- a/gnu/tests/docker.scm
+++ b/gnu/tests/docker.scm
@@ -79,7 +79,8 @@ inside %DOCKER-OS."
                        (gnu build marionette))
 
           (define marionette
-            (make-marionette (list #$vm)))
+            ;; Relax timeout to accommodate older systems.
+            (make-marionette (list #$vm) #:timeout 60))
 
           (test-runner-current (system-test-runner #$output))
           (test-begin "docker")
@@ -221,7 +222,8 @@ inside %DOCKER-OS."
                        (guix build utils))
 
           (define marionette
-            (make-marionette (list #$vm)))
+            ;; Relax timeout to accommodate older systems.
+            (make-marionette (list #$vm) #:timeout 60))
 
           (test-runner-current (system-test-runner #$output))
           (test-begin "docker")