diff options
Diffstat (limited to 'builder/base.scm')
| -rw-r--r-- | builder/base.scm | 14 |
1 files changed, 14 insertions, 0 deletions
diff --git a/builder/base.scm b/builder/base.scm index ff23a46..3e83ac6 100644 --- a/builder/base.scm +++ b/builder/base.scm @@ -1,6 +1,7 @@ (define-module (builder base) #:use-module (haunt site) #:use-module (builder components) + #:use-module (json) #:export (base-template contained-template page-template)) @@ -35,6 +36,19 @@ ,@(map (lambda (item) `(meta (@ (name ,(car item)) (value ,(list-ref (cdr item) 0))))) open-graph) + ;; JSON-LD + (script (@ (type "application/ld+json")) + ,(scm->json-string + '(("@context" . "https://schema.org") + ("@type" . "Person") + ("name" . "Eltrac") + ("url" . "https://eltr.ac") + ("image" . "https://eltr.ac/static/avatar.jpg") + ("description" . "I write software, fictions and non-fictions.") + ("email" . "mailto:hi@eltr.ac") + ("sameAs" . #("https://geedea.pro/" + "https://geedea.pro/en/" + "https://codeberg.org/eltrac"))))) ;; stylesheet ,@(map (lambda (uri) `(link (@ (rel "stylesheet") (href ,uri)))) |