aboutsummaryrefslogtreecommitdiff
path: root/guix-data-service/web/html-utils.scm
diff options
context:
space:
mode:
authorChristopher Baines <mail@cbaines.net>2021-01-03 09:43:24 +0000
committerChristopher Baines <mail@cbaines.net>2021-01-03 09:43:24 +0000
commite4762394794e7a67b4480c7d1918a057df8a3f38 (patch)
tree7d3b2b55cfd06b35f9a1382638e164930e408612 /guix-data-service/web/html-utils.scm
parentbd8390673e073a4d66082e48120cc3c86a255fc8 (diff)
downloaddata-service-e4762394794e7a67b4480c7d1918a057df8a3f38.tar
data-service-e4762394794e7a67b4480c7d1918a057df8a3f38.tar.gz
Fix another squee upgrade issue
Diffstat (limited to 'guix-data-service/web/html-utils.scm')
-rw-r--r--guix-data-service/web/html-utils.scm6
1 files changed, 4 insertions, 2 deletions
diff --git a/guix-data-service/web/html-utils.scm b/guix-data-service/web/html-utils.scm
index d38c448..ab2fa85 100644
--- a/guix-data-service/web/html-utils.scm
+++ b/guix-data-service/web/html-utils.scm
@@ -67,7 +67,8 @@
("failed-dependency" . "Failed (dependency)")
("failed-other" . "Failed (other)")
("canceled" . "Canceled")
- ("" . "Unknown"))
+ ("" . "Unknown")
+ (#f . "Unknown"))
value))
(define (build-url build-server-id build-server-build-id derivation-file-name)
@@ -110,7 +111,8 @@
("failed-dependency" . "warning")
("failed-other" . "danger")
("canceled" . "default")
- ("" . "default"))
+ ("" . "default")
+ (#f . "default"))
status)))
(style "display: inline-block; font-size: 1.2em; margin-top: 0.4em; margin-bottom: 0.4em;"))
,(build-status-value->display-string status)))