(local fennel (require :fennel))
(local html (require :html))

(local template
 [:html {:lang "en"}
  [:head {}
   [:meta {:charset "UTF-8"}]
   [:title {} "A new cool web server for lua"]]
  [:body {}
   [:h1 {} "Hello!"]
   [:pre {} "This is my super blog!"]]])

(fn root-handler [method path headers body]
  (let [headers { :content-type "text/html" }]
    (values 200 headers (html.render template))))

{ :routes { :/ root-handler } }