aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorChristopher Baines <mail@cbaines.net>2019-10-12 21:50:13 +0100
committerChristopher Baines <mail@cbaines.net>2019-10-12 21:50:13 +0100
commit9fa2e9e5ac92af3488bfee8b5573a3e3c522243c (patch)
tree88e4ed70a371fc4781b771015b32eabbd9f68bf6
parent2b9c882e5aceaf3aa6045ecbccc16b305fdcf0ae (diff)
downloaddata-service-9fa2e9e5ac92af3488bfee8b5573a3e3c522243c.tar
data-service-9fa2e9e5ac92af3488bfee8b5573a3e3c522243c.tar.gz
Improve linking between the Jobs and Job queue pages
-rw-r--r--guix-data-service/web/view/html.scm13
1 files changed, 12 insertions, 1 deletions
diff --git a/guix-data-service/web/view/html.scm b/guix-data-service/web/view/html.scm
index b0857d1..b49c254 100644
--- a/guix-data-service/web/view/html.scm
+++ b/guix-data-service/web/view/html.scm
@@ -1437,7 +1437,16 @@
(@ (class "row"))
(div
(@ (class "col-sm-12"))
- (h1 "Jobs")))
+ (h1 (@ (style "display: inline-block;"))
+ "Jobs")
+ (div
+ (@ (class "btn-group pull-right")
+ (style "margin-top: 1.3rem;")
+ (role "group"))
+ (a (@ (class "btn btn-lg btn-default")
+ (href "/jobs/queue")
+ (role "button"))
+ "Queue"))))
(div
(@ (class "row"))
(div
@@ -1502,6 +1511,8 @@
(@ (class "row"))
(div
(@ (class "col-sm-12"))
+ (a (@ (href "/jobs"))
+ (h3 "Jobs"))
(h1 "Queued jobs ("
,(length jobs-and-events)
")")))