diff options
| author | Christopher Baines <mail@cbaines.net> | 2021-01-03 14:58:46 +0000 |
|---|---|---|
| committer | Christopher Baines <mail@cbaines.net> | 2021-01-03 14:58:46 +0000 |
| commit | 3ae27baa010fbc49f1d0b94cf27bcbfcdde88698 (patch) | |
| tree | b58aa95533859bd3ae457bd18eea5528b282d90e | |
| parent | e3878fefb4184f3ad45a6e6f434767c0bf109db8 (diff) | |
| download | data-service-3ae27baa010fbc49f1d0b94cf27bcbfcdde88698.tar data-service-3ae27baa010fbc49f1d0b94cf27bcbfcdde88698.tar.gz | |
Fix broken build links in view-revision-package-and-version
| -rw-r--r-- | guix-data-service/web/revision/html.scm | 13 |
1 files changed, 7 insertions, 6 deletions
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 |