diff options
author | Christopher Baines <mail@cbaines.net> | 2023-09-30 10:14:32 +0100 |
---|---|---|
committer | Christopher Baines <mail@cbaines.net> | 2023-09-30 10:14:32 +0100 |
commit | fe895cdd1c540e4dd119aca542c466b178c36b37 (patch) | |
tree | 88933e8fb9048a6d29feab120e642d4a34444ac9 /guix-qa-frontpage/view/home.scm | |
parent | cb89d428b7f1e830693f7445cd801649ddbdf55a (diff) | |
download | qa-frontpage-fe895cdd1c540e4dd119aca542c466b178c36b37.tar qa-frontpage-fe895cdd1c540e4dd119aca542c466b178c36b37.tar.gz |
Link and show some patches stats on the homepage
Diffstat (limited to 'guix-qa-frontpage/view/home.scm')
-rw-r--r-- | guix-qa-frontpage/view/home.scm | 46 |
1 files changed, 44 insertions, 2 deletions
diff --git a/guix-qa-frontpage/view/home.scm b/guix-qa-frontpage/view/home.scm index c5428b1..de14cc0 100644 --- a/guix-qa-frontpage/view/home.scm +++ b/guix-qa-frontpage/view/home.scm @@ -8,6 +8,22 @@ (define (home branches) (layout #:description "Guix Quality Assurance" + #:head + '((style " +dt:before { + content: ""; + display: block; +} +dt, dd { + display: inline; +} +dd { + margin-left: 0.6em; +} +dt { + margin-left: 2em; +} +")) #:body `((main (div @@ -20,8 +36,34 @@ (div (@ (class "row")) (section - (a (@ (href "/patches")) - "List of issues for patches"))) + (a (@ (href "/patches") + (style "font-size: 140%;")) + "List of issues for patches") + + (div + (h3 "Statistics") + (p + (a + (@ (href "https://debbugs.gnu.org/rrd/guix-patches.html")) + (img (@ (width "60%") + (src "https://debbugs.gnu.org/rrd/guix-patches_1m.png")))) + + (dl + (@ (style "margin-top: 0;")) + (dt "CR") + (dd "serious,grave,critical") + + (dt "IM") + (dd "important") + + (dt "NO") + (dd "normal") + + (dt "MI") + (dd "minor") + + (dt "WI") + (dd "wishlist")))))) (h2 "Branches") (div |