From 9fa2e9e5ac92af3488bfee8b5573a3e3c522243c Mon Sep 17 00:00:00 2001 From: Christopher Baines Date: Sat, 12 Oct 2019 21:50:13 +0100 Subject: Improve linking between the Jobs and Job queue pages --- guix-data-service/web/view/html.scm | 13 ++++++++++++- 1 file changed, 12 insertions(+), 1 deletion(-) 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) ")"))) -- cgit v1.2.3