branch master updated: Move weather icon next to build status icon.

[Mathieu Othacehe]

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

mothacehe pushed a commit to branch master
in repository guix-cuirass.

The following commit(s) were added to refs/heads/master by this push:
     new f666229  Move weather icon next to build status icon.
f666229 is described below

commit f6662298c95372d725b44ed46cd1b7b80ea1c31a
Author: Mathieu Othacehe <othacehe@gnu.org>
AuthorDate: Mon Feb 1 19:02:27 2021 +0100

    Move weather icon next to build status icon.
    
    * src/cuirass/templates.scm (build-details): Move the weather icon.
---
 src/cuirass/templates.scm | 10 +++++-----
 1 file changed, 5 insertions(+), 5 deletions(-)

diff --git a/src/cuirass/templates.scm b/src/cuirass/templates.scm
index 5d641c4..b0ca9ec 100644
--- a/src/cuirass/templates.scm
+++ b/src/cuirass/templates.scm
@@ -551,12 +551,12 @@ and BUILD-MAX are global minimal and maximal (stoptime, 
rowid) pairs."
     `(thead
       (tr
        (th (@ (scope "col") (class "border-0")) '())
+       (th (@ (scope "col") (class "border-0")) '())
        (th (@ (scope "col") (class "border-0")) "ID")
        (th (@ (scope "col") (class "border-0")) "Specification")
        (th (@ (scope "col") (class "border-0")) "Completion time")
        (th (@ (scope "col") (class "border-0")) "Job")
        (th (@ (scope "col") (class "border-0")) "Name")
-       (th (@ (scope "col") (class "border-0")) "Weather")
        (th (@ (scope "col") (class "border-0")) "System")
        (th (@ (scope "col") (class "border-0")) "Log"))))
 
@@ -576,6 +576,10 @@ and BUILD-MAX are global minimal and maximal (stoptime, 
rowid) pairs."
                    (title ,(status-title status))
                    (aria-hidden "true"))
                 ""))
+      (td (span (@ (class ,(weather-class weather))
+                   (title ,(weather-title weather))
+                   (aria-hidden "true"))
+                ""))
       (th (@ (scope "row"))
           (a (@ (href "/build/" ,(assq-ref build #:id) "/details"))
              ,(assq-ref build #:id)))
@@ -585,10 +589,6 @@ and BUILD-MAX are global minimal and maximal (stoptime, 
rowid) pairs."
                "—"))
       (td ,(assq-ref build #:job))
       (td ,(assq-ref build #:nixname))
-      (td (span (@ (class ,(weather-class weather))
-                   (title ,(weather-title weather))
-                   (aria-hidden "true"))
-                ""))
       (td ,(assq-ref build #:system))
       (td (a (@ (href "/build/" ,(assq-ref build #:id) "/log/raw"))
                "raw"))))