summaryrefslogtreecommitdiff
path: root/builder/components.scm
diff options
context:
space:
mode:
authoreltrac <hi@eltr.ac>2026-10-26 22:16:23 +0800
committereltrac <hi@eltr.ac>2026-10-26 22:21:33 +0800
commit49d90314649d3ba52a83f3183ae65e186565fedc (patch)
tree73f510c97b85047996c615ed6d61ffb0cda9597a /builder/components.scm
parent9bf74d61913cc26e348dacd2a4999d6050e43e65 (diff)
add microformats h-card
Diffstat (limited to 'builder/components.scm')
-rw-r--r--builder/components.scm12
1 files changed, 8 insertions, 4 deletions
diff --git a/builder/components.scm b/builder/components.scm
index 1e0d9fe..35d7bd8 100644
--- a/builder/components.scm
+++ b/builder/components.scm
@@ -3,11 +3,15 @@
linkline slash link elink))
(define (header name desc image)
- `(header (@ (class "header"))
- (div (img (@ (src ,image) (class "header-image"))))
+ `(header (@ (class "header h-card"))
+ (div (img (@ (src ,image) (class "header-image u-photo"))))
(div (@ (class "header-text"))
- (h2 (@ (class "header-title")) ,name)
- (div (@ (class "header-desc")) ,desc))))
+ (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))