diff --git a/guix-data-service/web/revision/html.scm b/guix-data-service/web/revision/html.scm index 0c4aaf1..1012d65 100644 --- a/guix-data-service/web/revision/html.scm +++ b/guix-data-service/web/revision/html.scm @@ -297,12 +297,13 @@ (@ (class "list-inline")) ,@(map (lambda (build) `(li - `(a (@ (href ,(build-url - build-server-id - (assoc-ref build - "build_server_build_id") - derivation-file-name))) - ,(build-status-alist->build-icon build)))) + (a (@ (href ,(build-url + (assoc-ref build + "build_server_id") + (assoc-ref build + "build_server_build_id") + file-name))) + ,(build-status-alist->build-icon build)))) builds)))))) derivations))))) (div