diff options
| author | Christopher Baines <mail@cbaines.net> | 2025-04-08 18:21:27 +0100 |
|---|---|---|
| committer | Christopher Baines <mail@cbaines.net> | 2025-04-08 18:21:27 +0100 |
| commit | 524257e644ad4d377e362c3f35b0e391e65793b0 (patch) | |
| tree | 9cb57ac976112742ffa3721891c0e16a36901da0 | |
| parent | 3f4c7dd00313c733e4c54982e8e7e044f588e960 (diff) | |
| download | qa-frontpage-trunk.tar qa-frontpage-trunk.tar.gz | |
Retry git-get-remote-branchestrunk
| -rw-r--r-- | guix-qa-frontpage/branch.scm | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/guix-qa-frontpage/branch.scm b/guix-qa-frontpage/branch.scm index a9a37b9..9512a39 100644 --- a/guix-qa-frontpage/branch.scm +++ b/guix-qa-frontpage/branch.scm @@ -113,7 +113,11 @@ (assoc-ref branch "name")) (string=? (assoc-ref branch "commit") ""))) - (get-git-remote-branches "origin"))))) + (retry-on-error + (lambda () + (get-git-remote-branches "origin")) + #:times 6 + #:delay-seconds 20))))) (let* ((initial-ordered-branches (stable-sort branches |