branch master updated: Handle evaluations without timestamp.

[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 33798ab  Handle evaluations without timestamp.
33798ab is described below

commit 33798abc3bb32af619ce350b479888d190021ae9
Author: Mathieu Othacehe <othacehe@gnu.org>
AuthorDate: Sun Sep 6 14:42:40 2020 +0200

    Handle evaluations without timestamp.
    
    This is a follow-up of d9879583afee201cb9a2fec6d5fd3a491247d475.
    
    * src/cuirass/templates.scm (evaluation-build-table): Do not print 
evaluation
    date if the "timestamp" field equals zero.
---
 src/cuirass/templates.scm | 14 ++++++++------
 1 file changed, 8 insertions(+), 6 deletions(-)

diff --git a/src/cuirass/templates.scm b/src/cuirass/templates.scm
index f099a49..66d6de9 100644
--- a/src/cuirass/templates.scm
+++ b/src/cuirass/templates.scm
@@ -619,12 +619,14 @@ evaluation."
 
   `((p (@ (class "lead"))
        ,(format #f "Evaluation #~a" id))
-    ,(if (= evaltime 0)
-         `(p ,(format #f "Evaluation started ~a."
-                      (time->string timestamp)))
-         `(p ,(format #f "Evaluation completed ~a in ~a."
-                      (time->string evaltime)
-                      (seconds->string duration))))
+    ,@(if (= timestamp 0)
+          '()
+          `((p ,(if (= evaltime 0)
+                     (format #f "Evaluation started ~a."
+                             (time->string timestamp))
+                     (format #f "Evaluation completed ~a in ~a."
+                             (time->string evaltime)
+                             (seconds->string duration))))))
     (table (@ (class "table table-sm table-hover"))
            (thead
             (tr (th (@ (class "border-0") (scope "col")) "Input")