21 lines
494 B
Clojure
21 lines
494 B
Clojure
(ns luduverse.handler
|
|
(:require [compojure.core :refer :all]
|
|
[compojure.route :as route]
|
|
[noir.util.middleware :as middleware]
|
|
[luduverse.pages :as pages]))
|
|
|
|
(defroutes core-routes
|
|
(route/resources "/")
|
|
(GET "/" [] (pages/front-page))
|
|
(route/not-found "404, sorry."))
|
|
|
|
(defn init [])
|
|
|
|
(defn destroy [])
|
|
|
|
(def app (middleware/app-handler
|
|
[core-routes]
|
|
:middleware []
|
|
:access-rules []
|
|
:formats [:json-kw :edn]))
|