capybara/templates/article.html.rkt

#lang s-exp "../xtemplate.rkt"

`(html
  ([lang "en"])
  (head
    ()
    (!HTML-COMMENT () " this page made with: trans rights 🏳️‍⚧️ ")
    (meta ([charset "utf-8"]))
    (title () ,(metadata-ref+ metadata 'title "<untitled article>"))
    (meta ([name "viewport"] [content "width=device-width, initial-scale=1"]))
    ,@(match (metadata-ref+ metadata 'summary)
             [#f '()]
             [summary
               `((meta ([name "description"] [content ,summary])))])
    ,@(match (metadata-ref metadata 'authors)
             [(or #f '()) '()]
             [authors
               `((meta ([name "author"] [content ,(string-join authors ", ")])))])
    ,@(match (metadata-ref metadata 'date)
             [#f '()]
             [(list yn mn dn)
              `((meta ([name "DC.Date.created"]
                       [content ,(format "~a-~a-~a"
                                         (~r yn #:min-width 4 #:pad-string "0")
                                         (~r mn #:min-width 2 #:pad-string "0")
                                         (~r dn #:min-width 2 #:pad-string "0"))])))])
    (meta ([name "generator"] [content "meow meow meow meow"]))
    ;<link rel="shortcut icon" type="image/png" href="haskal.png"/>
    (link ([rel "stylesheet"] [type "text/css"] [href "index.css"])))
  (body
    ()
    (nav
      ()
      ,content-toc)
    (main
      ()
      ,@content)
    ;; mathjax polyfill script sentinel -- gets replaced by a script tag for crying doge chrombe
    ;; and with nothing for swole firefox
    (div ([style "display: none"]) "__X_MATHJAX_POLYFILL_PLACEHOLDER__")))