aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--guix-build-coordinator/agent.scm10
1 files changed, 7 insertions, 3 deletions
diff --git a/guix-build-coordinator/agent.scm b/guix-build-coordinator/agent.scm
index 62cc05d..37ef5ba 100644
--- a/guix-build-coordinator/agent.scm
+++ b/guix-build-coordinator/agent.scm
@@ -156,9 +156,13 @@
(let ((derivation
(if (file-exists? derivation-name)
(read-derivation-from-file derivation-name)
- (begin (substitute-derivation derivation-name
- #:substitute-urls
- substitute-urls)
+ (begin (retry-on-error
+ (lambda ()
+ (substitute-derivation derivation-name
+ #:substitute-urls
+ substitute-urls))
+ #:times 12
+ #:delay 20)
(read-derivation-from-file derivation-name)))))
(match (delete-outputs derivation)
(#t