From ff433dfce6b54c80fd5d8abf8b0e6f534437067b Mon Sep 17 00:00:00 2001 From: Christopher Baines Date: Sun, 22 Dec 2019 11:39:40 +0000 Subject: [PATCH] Handle derivations with no known build When displaying build stats. --- guix-data-service/web/revision/html.scm | 9 ++++++--- 1 file changed, 6 insertions(+), 3 deletions(-) diff --git a/guix-data-service/web/revision/html.scm b/guix-data-service/web/revision/html.scm index 54f63b9..1f451d1 100644 --- a/guix-data-service/web/revision/html.scm +++ b/guix-data-service/web/revision/html.scm @@ -1179,9 +1179,12 @@ figure { `(tr (td ,(build-status-span status)) ,@(map (lambda (id) - `(td ,(or (assq-ref counts-by-build-server-id - id) - 0))) + `(td ,(if (string-null? status) + (assq-ref counts-by-build-server-id + #f) + (or (assq-ref counts-by-build-server-id + id) + 0)))) (map cdr build-server-options))))) stats))))) (div