branch master updated: Fix broken build links in view-revision-package-and-version

[Christopher Baines]

This is an automated email from the git hooks/post-receive script.

cbaines pushed a commit to branch master
in repository data-service.

The following commit(s) were added to refs/heads/master by this push:
     new 3ae27ba  Fix broken build links in view-revision-package-and-version
3ae27ba is described below

commit 3ae27baa010fbc49f1d0b94cf27bcbfcdde88698
Author: Christopher Baines <mail@cbaines.net>
AuthorDate: Sun Jan 3 14:58:46 2021 +0000

    Fix broken build links in view-revision-package-and-version
---
 guix-data-service/web/revision/html.scm | 13 +++++++------
 1 file 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