aboutsummaryrefslogtreecommitdiff
path: root/guix-qa-frontpage/view
diff options
context:
space:
mode:
authorChristopher Baines <mail@cbaines.net>2023-07-21 16:09:37 +0100
committerChristopher Baines <mail@cbaines.net>2023-07-21 16:09:37 +0100
commita15ede9042123518d5dc681d5623033aa50dc590 (patch)
tree138ec3aef3903a4de9ac653f18ffa9d9b0877bf5 /guix-qa-frontpage/view
parentea6e5cfd3411fd2d33e267f6fe61db023c67d3fc (diff)
downloadqa-frontpage-a15ede9042123518d5dc681d5623033aa50dc590.tar
qa-frontpage-a15ede9042123518d5dc681d5623033aa50dc590.tar.gz
Fix "View comparison" links on the issue pages
Diffstat (limited to 'guix-qa-frontpage/view')
-rw-r--r--guix-qa-frontpage/view/issue.scm6
1 files changed, 5 insertions, 1 deletions
diff --git a/guix-qa-frontpage/view/issue.scm b/guix-qa-frontpage/view/issue.scm
index 052aaed..68ed8f1 100644
--- a/guix-qa-frontpage/view/issue.scm
+++ b/guix-qa-frontpage/view/issue.scm
@@ -231,7 +231,11 @@ td.bad {
systems-with-low-substitute-availability))))
,(package-changes-summary-table
- (assoc-ref change-details "revisions")
+ (let ((revisions (assoc-ref change-details "revisions")))
+ `((base . ,(assoc-ref (assoc-ref revisions "base")
+ "commit"))
+ (target . ,(assoc-ref (assoc-ref revisions "target")
+ "commit"))))
derivation-changes-counts
(string-append "/issue/" issue-number)))