blob: 9e1e0bd2b344c88ff2050b1b5460201933d3de42 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
|
(ns lezer.app
(:require lezer.controller.routes)
(:require phel.router :as r)
(:require phel.http :as h))
(def app
(r/handler
(r/router
[["/" {:handler routes/index-handler}]
["/ping" {:name ::ping
:get {:handler routes/ping-handler}
:post {:handler routes/ping-handler}}]])))
(when-not *build-mode*
(h/emit-response (app (h/request-from-globals))))
|