clojurecup2014-luduverse/src/luduverse/handler.clj

21 lines
494 B
Clojure
Raw Normal View History

2014-09-27 17:24:06 +02:00
(ns luduverse.handler
(:require [compojure.core :refer :all]
2014-09-27 17:24:06 +02:00
[compojure.route :as route]
[noir.util.middleware :as middleware]
[luduverse.pages :as pages]))
2014-09-27 17:24:06 +02:00
(defroutes core-routes
(route/resources "/")
(GET "/" [] (pages/front-page))
(route/not-found "404, sorry."))
2014-09-27 17:24:06 +02:00
(defn init [])
(defn destroy [])
(def app (middleware/app-handler
[core-routes]
:middleware []
:access-rules []
:formats [:json-kw :edn]))