diff options
| -rw-r--r-- | guix-qa-frontpage/utils.scm | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/guix-qa-frontpage/utils.scm b/guix-qa-frontpage/utils.scm index 12610f0..2cb00ac 100644 --- a/guix-qa-frontpage/utils.scm +++ b/guix-qa-frontpage/utils.scm @@ -149,8 +149,7 @@ (call-with-values (lambda () ;; This is mostly to set non fibers IO waiters - (with-port-timeouts thunk - #:timeout (* 300 1000))) + (with-port-timeouts thunk #:timeout 300)) (lambda values (put-message channel `(values ,@values))))) (lambda args |