branch master updated: Add a lock icon for admin actions.

[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 b200ea8  Add a lock icon for admin actions.
b200ea8 is described below

commit b200ea894778bfa9a64ed55d9985c7d83f5df910
Author: Mathieu Othacehe <othacehe@gnu.org>
AuthorDate: Fri Feb 19 09:19:09 2021 +0100

    Add a lock icon for admin actions.
    
    * src/cuirass/templates.scm (build-details, evaluation-info-table): Add lock
    icons for admin actions.
---
 src/cuirass/templates.scm | 8 ++++----
 1 file changed, 4 insertions(+), 4 deletions(-)

diff --git a/src/cuirass/templates.scm b/src/cuirass/templates.scm
index 56816ed..6e8cc8f 100644
--- a/src/cuirass/templates.scm
+++ b/src/cuirass/templates.scm
@@ -302,10 +302,10 @@ system whose names start with " (code "guile-") ":" (br)
                   (aria-expanded "false"))
                "Action")
             (div (@ (class "dropdown-menu"))
-                 (a (@ (class "dropdown-item")
+                 (a (@ (class "oi oi-lock-locked dropdown-item")
                        (href "/admin/build/"
                              ,(assq-ref build #:id) "/restart"))
-                    "Restart"))))
+                    " Restart"))))
     (table
      (@ (class "table table-sm table-hover"))
      (tbody
@@ -516,11 +516,11 @@ system whose names start with " (code "guile-") ":" (br)
                                 (aria-expanded "false"))
                              " ")
                           (div (@ (class "dropdown-menu"))
-                               (a (@ (class "dropdown-item")
+                               (a (@ (class "oi oi-lock-locked dropdown-item")
                                      (href "/admin/evaluation/"
                                            ,(assq-ref row #:id)
                                            "/restart"))
-                                  "Restart"))))))
+                                  " Restart"))))))
                  evaluations)))))
     ,(if (null? evaluations)
          (pagination "" "" "" "")