diff options
| author | eltrac <hi@eltr.ac> | 2026-10-31 14:35:53 +0800 |
|---|---|---|
| committer | eltrac <hi@eltr.ac> | 2026-10-31 14:35:53 +0800 |
| commit | f62076bac7bc749cced7fd69e4c59ed080bda1c9 (patch) | |
| tree | b55a2b553d7578e4a6ee98dd674c2abf532173ad /builder/components.scm | |
| parent | cc72f6fdb1cac6df629e62c7d1cf6c6ec7217984 (diff) | |
refactor templating; wider container for flat pages
Diffstat (limited to 'builder/components.scm')
| -rw-r--r-- | builder/components.scm | 13 |
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))) |
