aboutsummaryrefslogtreecommitdiff
path: root/guix-qa-frontpage/view
diff options
context:
space:
mode:
authorChristopher Baines <mail@cbaines.net>2023-06-03 11:43:49 +0100
committerChristopher Baines <mail@cbaines.net>2023-06-03 11:43:49 +0100
commit13c3321cefbda243c3d22f5f95ebb6c7fa842e45 (patch)
treea5315b5df7424e47fd8e7eb0268d73ecf0a9174d /guix-qa-frontpage/view
parent9bf4a545148ee30238dfb3669db8b357ed4b3f53 (diff)
downloadqa-frontpage-13c3321cefbda243c3d22f5f95ebb6c7fa842e45.tar
qa-frontpage-13c3321cefbda243c3d22f5f95ebb6c7fa842e45.tar.gz
Improve messaging around low substitute availability
Diffstat (limited to 'guix-qa-frontpage/view')
-rw-r--r--guix-qa-frontpage/view/issue.scm7
1 files changed, 6 insertions, 1 deletions
diff --git a/guix-qa-frontpage/view/issue.scm b/guix-qa-frontpage/view/issue.scm
index 9064832..47737be 100644
--- a/guix-qa-frontpage/view/issue.scm
+++ b/guix-qa-frontpage/view/issue.scm
@@ -201,8 +201,13 @@ td.bad {
,@(if (or (not builds-missing?)
(eq? #f systems-with-low-substitute-availability)
- (null? systems-with-low-substitute-availability))
+ (null? systems-with-low-substitute-availability)
+ (not comparison-details)
+ (guix-data-service-error? comparison-details)
+ (null? derivation-changes-counts))
'()
+ ;; TODO: Only show (and apply) this if it relates to these
+ ;; changes. So just look at the systems relevant to the changes.
`((p (@ (style ,(string-join
'("text-align: center;"
"font-weight: bold;"