[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[no subject]
From: |
Ludovic Courtès |
Date: |
Wed, 18 Oct 2023 10:04:50 -0400 (EDT) |
branch: master
commit e9c27b7ce582272a06b18ee703703244e39ef563
Author: Ludovic Courtès <ludo@gnu.org>
AuthorDate: Wed Oct 18 16:03:07 2023 +0200
templates: Do not show “Weather” row when weather is unknown.
* src/cuirass/templates.scm (build-details): Do not emit “Weather” row
when WEATHER is unknown.
---
src/cuirass/templates.scm | 16 +++++++++-------
1 file changed, 9 insertions(+), 7 deletions(-)
diff --git a/src/cuirass/templates.scm b/src/cuirass/templates.scm
index 1812820..f315ab9 100644
--- a/src/cuirass/templates.scm
+++ b/src/cuirass/templates.scm
@@ -774,13 +774,15 @@ the existing SPEC otherwise."
(td ,(if (completed? status)
(time->string (build-completion-time build))
"—")))
- (tr (th "Weather")
- (td (span (@ (class ,(weather-class weather))
- (title ,(weather-title weather))
- (aria-hidden "true"))
- "")
- " " ,(weather-title weather)
- ,@(build-failure-info build)))
+ ,@(if (= (build-weather unknown) weather)
+ '()
+ `((tr (th "Weather")
+ (td (span (@ (class ,(weather-class weather))
+ (title ,(weather-title weather))
+ (aria-hidden "true"))
+ "")
+ " " ,(weather-title weather)
+ ,@(build-failure-info build)))))
(tr (th "Log file")
(td ,(if (or (= (build-status started) status)
(= (build-status succeeded) status)