aboutsummaryrefslogtreecommitdiff
path: root/guix-qa-frontpage
diff options
context:
space:
mode:
authorChristopher Baines <mail@cbaines.net>2023-11-01 17:01:58 +0000
committerChristopher Baines <mail@cbaines.net>2023-11-01 17:01:58 +0000
commit5e19094595ef660e24317d2db5c800dac8e262e8 (patch)
treea54983d22a3cd648a5dbe90ea9cfe9a6a9654d29 /guix-qa-frontpage
parent6f785eedb7bf583020e5871aa6133f76f79e1450 (diff)
downloadqa-frontpage-5e19094595ef660e24317d2db5c800dac8e262e8.tar
qa-frontpage-5e19094595ef660e24317d2db5c800dac8e262e8.tar.gz
Add a Guix logo to the header
Diffstat (limited to 'guix-qa-frontpage')
-rw-r--r--guix-qa-frontpage/view/util.scm13
1 files changed, 9 insertions, 4 deletions
diff --git a/guix-qa-frontpage/view/util.scm b/guix-qa-frontpage/view/util.scm
index 4479fc8..b595b6b 100644
--- a/guix-qa-frontpage/view/util.scm
+++ b/guix-qa-frontpage/view/util.scm
@@ -229,10 +229,15 @@ main > header {
")
,@head)
(body (header
- (h1 "Guix QA"
- ,@(if title
- `(": " ,title)
- '())))
+ (h1
+ (img (@ (style "height: 1.4em;")
+ (src "/assets/img/guix.svg")))
+ (span
+ (@ (style "position: relative; left: -0.3em;"))
+ "Guix QA"
+ ,@(if title
+ `(": " ,title)
+ '()))))
,@body))))
(define* (form-horizontal-control label query-parameters