Readme for moe-2009.8.28
Moe: html with style
Example
first page
-- test.hs
import Prelude hiding ((/), (-), head, (>), (.), div)
import MPS.Light ((-))
import Text.HTML.Moe
test_page :: String
test_page = render -
html' - do
head' - do
meta
[http_equiv "Content-Type", content "text/html; charset-utf-8"] (/)
title' - str "my title"
link [rel "icon", _type "image/png", href "panda_icon.png"] (/)
body' - do
div [_class "container"] - do
str "hello world"
main :: IO ()
main = putStrLn test_page
install and run
cabal update
cabal install moe
runghc test.hs
output:
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset-utf-8">
</meta>
<title>
my title
</title>
<link rel="icon" type="image/png" href="panda_icon.png">
</link>
</head>
<body>
<div class="container">
hello world
</div>
</body>
</html>