((main-title "The Chicken Gazette"))
`((xhtml-1.0-strict)
(html (@ (xmlns "http://www.w3.org/1999/xhtml"))
(head
(meta (@ (http-equiv "content-type") (content "application/xhtml+xml; charset=UTF-8")))
(link (@ (href "http://wiki.call-cc.org/chicken.css") (rel "stylesheet") (type "text/css")))
(link (@ (href "/gazette.css") (rel "stylesheet") (type "text/css")))
(link (@ (rel "alternate") (href "/feed.atom") (type "application/atom+xml")))
(title ,($ 'main-title) ,(and ($ 'title) (conc " - " ($ 'title)))))
(body
(div (@ (id "content"))
(div (@ (id "header"))
(a (@ (href "/"))
(img (@ (src "/logo.png") (alt ,($ 'main-title))))))
(inject ,contents))
(p (@ (id "fineprint"))
"The chicken image used in the logo is kindly provided and © 2010 by Manfred Wischner"))))