branch: master
commit 74436dae50a87828c4986c7cd91a290936c50771
Author: Ludovic Courtès <[email protected]>
Date: Wed Nov 7 14:20:29 2018 +0100
templates: Adjust build table headers.
* src/cuirass/templates.scm (build-eval-table)[table-header]: Change
"Nixname" to "Name" and "Finished at" to "Completion time". Use strings
for each header.
---
src/cuirass/templates.scm | 15 ++++++++-------
1 file changed, 8 insertions(+), 7 deletions(-)
diff --git a/src/cuirass/templates.scm b/src/cuirass/templates.scm
index 119b5fb..dde0145 100644
--- a/src/cuirass/templates.scm
+++ b/src/cuirass/templates.scm
@@ -1,5 +1,6 @@
;;; templates.scm -- HTTP API
;;; Copyright © 2018 Tatiana Sholokhova <[email protected]>
+;;; Copyright © 2018 Ludovic Courtès <[email protected]>
;;;
;;; This file is part of Cuirass.
;;;
@@ -189,13 +190,13 @@ and BUILD-MAX are global minimal and maximal (stoptime,
rowid) pairs."
`(thead
(tr
(th (@ (scope "col")) '())
- (th (@ (scope "col")) ID)
- (th (@ (scope "col")) Specification)
- (th (@ (scope "col")) "Finished at")
- (th (@ (scope "col")) Job)
- (th (@ (scope "col")) Nixname)
- (th (@ (scope "col")) System)
- (th (@ (scope "col")) Log))))
+ (th (@ (scope "col")) "ID")
+ (th (@ (scope "col")) "Specification")
+ (th (@ (scope "col")) "Completion time")
+ (th (@ (scope "col")) "Job")
+ (th (@ (scope "col")) "Name")
+ (th (@ (scope "col")) "System")
+ (th (@ (scope "col")) "Log"))))
(define (table-row build)
(define status
