summaryrefslogtreecommitdiff
path: root/builder/components.scm
diff options
context:
space:
mode:
authoreltrac <hi@eltr.ac>2026-10-31 14:35:53 +0800
committereltrac <hi@eltr.ac>2026-10-31 14:35:53 +0800
commitf62076bac7bc749cced7fd69e4c59ed080bda1c9 (patch)
treeb55a2b553d7578e4a6ee98dd674c2abf532173ad /builder/components.scm
parentcc72f6fdb1cac6df629e62c7d1cf6c6ec7217984 (diff)
refactor templating; wider container for flat pages
Diffstat (limited to 'builder/components.scm')
-rw-r--r--builder/components.scm13
1 files changed, 1 insertions, 12 deletions
diff --git a/builder/components.scm b/builder/components.scm
index 35d7bd8..4606acc 100644
--- a/builder/components.scm
+++ b/builder/components.scm
@@ -1,18 +1,7 @@
(define-module (builder components)
- #:export (header badge prose small-prose linkbox
+ #:export (badge prose small-prose linkbox
linkline slash link elink))
-(define (header name desc image)
- `(header (@ (class "header h-card"))
- (div (img (@ (src ,image) (class "header-image u-photo"))))
- (div (@ (class "header-text"))
- (h2 (@ (class "header-title"))
- (a (@ (rel "me") (class "u-url") (href "/"))
- "Hi, "
- (span (@ (class "p-name")) ,name)
- " here 👋"))
- (div (@ (class "header-desc p-note")) ,desc))))
-
(define (badge name icon link)
`(a (@ (class "badge") (target "_blank") (href ,link))
(img (@ (src ,icon)))