35 lines
1.0 KiB
Racket
35 lines
1.0 KiB
Racket
|
#lang s-exp "../xtemplate.rkt"
|
||
|
|
||
|
`(html
|
||
|
([lang "en"])
|
||
|
(head
|
||
|
()
|
||
|
,*banner*
|
||
|
(meta ([charset "utf-8"]))
|
||
|
(title () ,(metadata-ref+ md 'title "<untitled article>"))
|
||
|
(meta ([name "viewport"] [content "width=device-width, initial-scale=1"]))
|
||
|
,@(match (metadata-ref+ md 'summary)
|
||
|
[#f '()]
|
||
|
[summary
|
||
|
`((meta ([name "description"] [content ,summary])))])
|
||
|
,@(match (metadata-ref md 'authors)
|
||
|
[(or #f '()) '()]
|
||
|
[authors
|
||
|
`((meta ([name "author"] [content ,(string-join authors ", ")])))])
|
||
|
,@(match (metadata-ref md 'date)
|
||
|
[#f '()]
|
||
|
[(list y m d)
|
||
|
`((meta ([name "DC.Date.created"] [content ,(format "~a-~a~a" y m d)])))])
|
||
|
(meta ([name "generator"] [content "meow meow meow meow"]))
|
||
|
;<link rel="shortcut icon" type="image/png" href="haskal.png"/>
|
||
|
(style ([type "text/css"]) ,styles))
|
||
|
(body
|
||
|
()
|
||
|
(nav
|
||
|
()
|
||
|
,output-toc)
|
||
|
(main
|
||
|
()
|
||
|
,@output-cooked)
|
||
|
,*mathjax-placeholder*))
|