diff options
| author | Christopher Baines <mail@cbaines.net> | 2024-12-15 13:44:51 +0000 |
|---|---|---|
| committer | Christopher Baines <mail@cbaines.net> | 2024-12-15 13:44:51 +0000 |
| commit | 439a6a8a2ef9aa3e6541f7077070255b5db1e1be (patch) | |
| tree | c1c2a807632f06cef7cd4f3e9d85ea7d5b84b2b2 /guix-qa-frontpage | |
| parent | de220be38007999ec8a2d570276bb0962441425a (diff) | |
| download | qa-frontpage-439a6a8a2ef9aa3e6541f7077070255b5db1e1be.tar qa-frontpage-439a6a8a2ef9aa3e6541f7077070255b5db1e1be.tar.gz | |
Fix a couple of undefined variables
Diffstat (limited to 'guix-qa-frontpage')
| -rw-r--r-- | guix-qa-frontpage/manage-builds.scm | 6 |
1 files changed, 1 insertions, 5 deletions
diff --git a/guix-qa-frontpage/manage-builds.scm b/guix-qa-frontpage/manage-builds.scm index e55c27c..6039ef8 100644 --- a/guix-qa-frontpage/manage-builds.scm +++ b/guix-qa-frontpage/manage-builds.scm @@ -295,11 +295,7 @@ (lambda () (let ((data (branch-derivation-changes-data revisions system))) - (if (assq-ref data 'exception) - (raise-exception - (guix-data-service-error-sexp->error data)) - (assoc-ref data "derivation_changes")))) - #:no-retry guix-data-service-error-invalid-query? + (assoc-ref data "derivation_changes"))) #:times 2 #:delay 15)) %systems-to-submit-builds-for)) |