Description
General-purpose web page scaffold for Lucid.
Description
This is a general organization scheme for web pages, implemented for Lucid.
It's as easy as 1-2-3:
λ> renderText $ template mempty "some content"
↪ "<!DOCTYPE HTML><html><head><title></title><link href
rel="icon"></head><body>some content</body></html>"overload the particular areas with record syntax and stuff:
λ> let page = WebPage
"foo"
mempty
mempty
mempty
mempty
mempty
mempty
(script_ [src_ "jquery.js"] "")
λ> template page "some content"
↪ "<!DOCTYPE HTML><html><head><title>foo</title><link href
rel=\"icon\"></head><body>some content<script
src=\"jquery.js\"></script></body></html>"