aboutsummaryrefslogtreecommitdiff
path: root/scripts
diff options
context:
space:
mode:
Diffstat (limited to 'scripts')
-rw-r--r--scripts/guix-build-coordinator-queue-builds-from-guix-data-service.in8
1 files changed, 6 insertions, 2 deletions
diff --git a/scripts/guix-build-coordinator-queue-builds-from-guix-data-service.in b/scripts/guix-build-coordinator-queue-builds-from-guix-data-service.in
index f405503..d765db5 100644
--- a/scripts/guix-build-coordinator-queue-builds-from-guix-data-service.in
+++ b/scripts/guix-build-coordinator-queue-builds-from-guix-data-service.in
@@ -75,8 +75,12 @@
query-parameters)
"&"))))))
- (let-values (((response body) (http-get uri)))
- (json-string->scm (utf8->string body))))
+ (retry-on-error
+ (lambda ()
+ (let-values (((response body) (http-get uri)))
+ (json-string->scm (utf8->string body))))
+ #:times 6
+ #:delay 30))
(define (unseen-revisions)
(let ((data (guix-data-service-request "/repository/1/branch/master.json")))