diff options
| author | Christopher Baines <mail@cbaines.net> | 2023-10-06 11:26:11 +0100 |
|---|---|---|
| committer | Christopher Baines <mail@cbaines.net> | 2023-10-06 11:26:11 +0100 |
| commit | 3f289bcb7e58f8c3061c5b7ccf8786d7b456b893 (patch) | |
| tree | b091ded52cca88baceba448c515b17a4f07be2f4 | |
| parent | 76dacdfa6295c81b228b88e682900e41fe991bd2 (diff) | |
| download | qa-frontpage-3f289bcb7e58f8c3061c5b7ccf8786d7b456b893.tar qa-frontpage-3f289bcb7e58f8c3061c5b7ccf8786d7b456b893.tar.gz | |
Avoid exceptions when updating branch substitute availability metrics
| -rw-r--r-- | guix-qa-frontpage/branch.scm | 7 |
1 files changed, 4 insertions, 3 deletions
diff --git a/guix-qa-frontpage/branch.scm b/guix-qa-frontpage/branch.scm index 2d21997..6c76b0f 100644 --- a/guix-qa-frontpage/branch.scm +++ b/guix-qa-frontpage/branch.scm @@ -421,9 +421,10 @@ #:version 2 #:ttl (/ frequency 2)))) - (update-branch-substitute-availability-metrics - branch-name - substitute-availability))) + (unless (assq-ref substitute-availability 'exception) + (update-branch-substitute-availability-metrics + branch-name + substitute-availability)))) (lambda _ (backtrace)))) #:unwind? #t)) |