aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--guix-build-coordinator/agent.scm16
1 files changed, 10 insertions, 6 deletions
diff --git a/guix-build-coordinator/agent.scm b/guix-build-coordinator/agent.scm
index 84be0ca..06518ed 100644
--- a/guix-build-coordinator/agent.scm
+++ b/guix-build-coordinator/agent.scm
@@ -153,13 +153,17 @@
(begin
(retry-on-error
(lambda ()
- ;; Download the substitutes
- (with-store store
- (set-build-options store
- #:substitute-urls
- non-derivation-substitute-urls)
+ (with-timeout (* 1000 60 10) ; 10 minutes
+ (raise-exception
+ (make-exception-with-message "timeout fetching inputs"))
+ (begin
+ ;; Download the substitutes
+ (with-store store
+ (set-build-options store
+ #:substitute-urls
+ non-derivation-substitute-urls)
- (build-things store missing-paths)))
+ (build-things store missing-paths)))))
#:times 6
#:delay 60)