aboutsummaryrefslogtreecommitdiff
path: root/guix-qa-frontpage
diff options
context:
space:
mode:
Diffstat (limited to 'guix-qa-frontpage')
-rw-r--r--guix-qa-frontpage/view/issue.scm4
1 files changed, 2 insertions, 2 deletions
diff --git a/guix-qa-frontpage/view/issue.scm b/guix-qa-frontpage/view/issue.scm
index 09e6bb5..133e0a6 100644
--- a/guix-qa-frontpage/view/issue.scm
+++ b/guix-qa-frontpage/view/issue.scm
@@ -216,7 +216,7 @@ td.bad {
(eq? #f systems-with-low-substitute-availability)
(null? systems-with-low-substitute-availability)
(not comparison-details)
- (guix-data-service-error? comparison-details)
+ (assq-ref comparison-details 'exception)
(null? derivation-changes-counts))
'()
;; TODO: Only show (and apply) this if it relates to these
@@ -278,7 +278,7 @@ td.bad {
(th)))))
(tbody
,@(if (and comparison-details
- (not (guix-data-service-error? comparison-details))
+ (not (assq-ref comparison-details 'exception))
derivation-changes-counts)
(if (null? derivation-changes-counts)
`((tr