aboutsummaryrefslogtreecommitdiff
path: root/guix-qa-frontpage/view/home.scm
diff options
context:
space:
mode:
authorChristopher Baines <mail@cbaines.net>2022-09-06 09:28:36 +0100
committerChristopher Baines <mail@cbaines.net>2022-09-06 09:28:36 +0100
commitd9259dc7afe1ac6f847fa49d7ca26800b5a0e276 (patch)
tree31bea1965bfe148516a09d691fae639efde36375 /guix-qa-frontpage/view/home.scm
parent24a2aa3265ac278e48e98f4435c3dc8664acb3ba (diff)
downloadqa-frontpage-d9259dc7afe1ac6f847fa49d7ca26800b5a0e276.tar
qa-frontpage-d9259dc7afe1ac6f847fa49d7ca26800b5a0e276.tar.gz
Make the homepage more useful
Link to the page with all the patches on it, and add a notice about this service being very new.
Diffstat (limited to 'guix-qa-frontpage/view/home.scm')
-rw-r--r--guix-qa-frontpage/view/home.scm27
1 files changed, 20 insertions, 7 deletions
diff --git a/guix-qa-frontpage/view/home.scm b/guix-qa-frontpage/view/home.scm
index 7f23201..ef1ed4f 100644
--- a/guix-qa-frontpage/view/home.scm
+++ b/guix-qa-frontpage/view/home.scm
@@ -7,6 +7,17 @@
#:description "Guix Quality Assurance"
#:body
`((main
+ (p
+ (@ (style "text-align: center; padding: 2rem; border: 0.3rem dashed red;"))
+ "This service is in the very early stages of development. "
+ (br)
+ "Find the code in "
+ (a (@ (href "https://git.cbaines.net/guix/qa-frontpage/"))
+ "this git repository")
+ " and send patches to "
+ (a (@ (href "mailto:mail@cbaines.net"))
+ "mail@cbaines.net")
+ ".")
;; (div (@ (class "row"))
;; (section
;; (h2 "branch: master")))
@@ -18,10 +29,12 @@
;; (section
;; (h3 "branch: staging")))
(h2 "Patches")
- (div
- (@ (class "row two-element-row"))
- (section
- (h3 "Checks passing"))
- (section
- (h3 "Unreviewed")))))))
-
+ (a (@ (href "/patches"))
+ "List of issues for patches")
+ ;; (div
+ ;; (@ (class "row two-element-row"))
+ ;; (section
+ ;; (h3 "Checks passing"))
+ ;; (section
+ ;; (h3 "Unreviewed")))
+ ))))