diff options
Diffstat (limited to 'init.fnl')
| -rw-r--r-- | init.fnl | 24 |
1 files changed, 16 insertions, 8 deletions
@@ -1,9 +1,17 @@ (local fennel (require :fennel)) -{ - :routes { - :/ (fn [method path headers body] - (values 200 { :content-type "applicaton/json" } - "{ \"test\": 123 }")) - ; :/test (fn [] "test?") - } -} +(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 } } |
