diff options
author | Christopher Baines <mail@cbaines.net> | 2020-07-13 18:55:07 +0100 |
---|---|---|
committer | Christopher Baines <mail@cbaines.net> | 2020-07-13 18:55:07 +0100 |
commit | 745a8bdbf13c83822db4ed9db18fadbef2bc3b4c (patch) | |
tree | 741f0cb1cd81ee52bb008c1c5c303365b493048e | |
parent | e9d4e74e5606932f34e0f2ab30321ac8384c8edc (diff) | |
download | data-service-745a8bdbf13c83822db4ed9db18fadbef2bc3b4c.tar data-service-745a8bdbf13c83822db4ed9db18fadbef2bc3b4c.tar.gz |
Also show related failed builds for scheduled builds
Because the Guix Build Coordinator doesn't mark builds blocked by failures as
failed-dependency, they're just left as scheduled.
-rw-r--r-- | guix-data-service/web/build-server/controller.scm | 8 |
1 files changed, 6 insertions, 2 deletions
diff --git a/guix-data-service/web/build-server/controller.scm b/guix-data-service/web/build-server/controller.scm index c68ef7d..6fa5385 100644 --- a/guix-data-service/web/build-server/controller.scm +++ b/guix-data-service/web/build-server/controller.scm @@ -70,10 +70,14 @@ #:sxml (view-build query-parameters build - (if (string=? + (if (member (assoc-ref (last (vector->list (third build))) "status") - "failed-dependency") + '("failed-dependency" + "scheduled")) ; scheduled, because the + ; guix-build-coordinator doesn't + ; mark builds as + ; failed-dependency (select-required-builds-that-failed conn build-server-id |