diff options
| author | Christopher Baines <mail@cbaines.net> | 2019-12-23 21:30:36 +0000 |
|---|---|---|
| committer | Christopher Baines <mail@cbaines.net> | 2019-12-23 21:30:36 +0000 |
| commit | 5c643e09e504094cfd8a43ba36e3537f0df97ae2 (patch) | |
| tree | f5bdaf11accc36cc1f7002d43d7c30f61d9bc2af /guix-data-service/web/revision | |
| parent | 474d942cbbe1bcffd6c47d7245b4510f6b7c51c5 (diff) | |
| download | data-service-5c643e09e504094cfd8a43ba36e3537f0df97ae2.tar data-service-5c643e09e504094cfd8a43ba36e3537f0df97ae2.tar.gz | |
Fix the unknown build counts on the builds pages
Diffstat (limited to 'guix-data-service/web/revision')
| -rw-r--r-- | guix-data-service/web/revision/html.scm | 10 |
1 files changed, 4 insertions, 6 deletions
diff --git a/guix-data-service/web/revision/html.scm b/guix-data-service/web/revision/html.scm index 5d166c9..6007425 100644 --- a/guix-data-service/web/revision/html.scm +++ b/guix-data-service/web/revision/html.scm @@ -1180,12 +1180,10 @@ figure { `(tr (td ,(build-status-span status)) ,@(map (lambda (id) - `(td ,(if (string-null? status) - (assq-ref counts-by-build-server-id - #f) - (or (assq-ref counts-by-build-server-id - id) - 0)))) + `(td + ,(or (assq-ref counts-by-build-server-id + id) + 0))) (map cdr build-server-options))))) stats))))) (div |