Handle derivations with no known build

When displaying build stats.
2019-12-22 11:39:40 +00:00 · 2019-12-22 11:39:40 +00:00 · ff433dfce6
commit ff433dfce6
parent 89e34f3df8
1 changed files with 6 additions and 3 deletions
--- 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