aboutsummaryrefslogtreecommitdiff
path: root/guix-build-coordinator/agent.scm
diff options
context:
space:
mode:
authorChristopher Baines <mail@cbaines.net>2024-06-10 13:25:36 +0100
committerChristopher Baines <mail@cbaines.net>2024-06-10 13:25:36 +0100
commit666cf6b0b903dd14d8075b76151c5fb39bab5b61 (patch)
tree3fc13793849d8df0135c6547e866389ba9f53e5b /guix-build-coordinator/agent.scm
parent4ccfaffc1965cb4ed060bbd82a425026ab3bb36e (diff)
downloadbuild-coordinator-666cf6b0b903dd14d8075b76151c5fb39bab5b61.tar
build-coordinator-666cf6b0b903dd14d8075b76151c5fb39bab5b61.tar.gz
Change with-port-timeouts to use seconds for the timeout
Diffstat (limited to 'guix-build-coordinator/agent.scm')
-rw-r--r--guix-build-coordinator/agent.scm4
1 files changed, 2 insertions, 2 deletions
diff --git a/guix-build-coordinator/agent.scm b/guix-build-coordinator/agent.scm
index 7c00ca1..7afd549 100644
--- a/guix-build-coordinator/agent.scm
+++ b/guix-build-coordinator/agent.scm
@@ -645,7 +645,7 @@ unable to query substitute servers without caching"))
(has-substiutes-no-cache?
non-derivation-substitute-urls
file))
- #:timeout (* 60 1000)))
+ #:timeout 60))
#:times 20
#:delay (random 15))
#f)))
@@ -707,7 +707,7 @@ but the guix-daemon claims it's unavailable"
((current-build-output-port log-port))
(build-things fetch-substitute-store
missing-paths)))
- #:timeout (* 60 10 1000)))
+ #:timeout (* 60 10)))
(lambda (key . args)
(log-msg lgr 'ERROR
"exception when fetching missing paths "