Merge remote-tracking branch 'origin/develop' into develop
This commit is contained in:
commit
d7c31f913f
40
src/clj/geocsv/handler serves resources.clj
Normal file
40
src/clj/geocsv/handler serves resources.clj
Normal file
|
@ -0,0 +1,40 @@
|
||||||
|
(ns geocsv.handler
|
||||||
|
(:require [compojure.core :refer [routes wrap-routes]]
|
||||||
|
[geocsv.env :refer [defaults]]
|
||||||
|
[geocsv.middleware :as middleware]
|
||||||
|
[geocsv.layout :refer [error-page]]
|
||||||
|
[geocsv.routes.home :refer [home-routes]]
|
||||||
|
[geocsv.routes.json :refer [json-routes]]
|
||||||
|
[reitit.ring :as ring]
|
||||||
|
[ring.middleware.content-type :refer [wrap-content-type]]
|
||||||
|
[ring.middleware.webjars :refer [wrap-webjars]]
|
||||||
|
[mount.core :as mount]))
|
||||||
|
|
||||||
|
(mount/defstate init-app
|
||||||
|
:start ((or (:init defaults) (fn [])))
|
||||||
|
:stop ((or (:stop defaults) (fn []))))
|
||||||
|
|
||||||
|
(mount/defstate app-routes
|
||||||
|
:start
|
||||||
|
(ring/ring-handler
|
||||||
|
(ring/router
|
||||||
|
[(home-routes)
|
||||||
|
;; (-> #'json-routes
|
||||||
|
;; (wrap-routes middleware/wrap-csrf)
|
||||||
|
;; (wrap-routes middleware/wrap-formats))
|
||||||
|
])
|
||||||
|
(ring/routes
|
||||||
|
(ring/create-resource-handler
|
||||||
|
{:path "/"})
|
||||||
|
(wrap-content-type
|
||||||
|
(wrap-webjars (constantly nil)))
|
||||||
|
(ring/create-default-handler
|
||||||
|
{:not-found
|
||||||
|
(constantly (error-page {:status 404, :title "404 - Page not found"}))
|
||||||
|
:method-not-allowed
|
||||||
|
(constantly (error-page {:status 405, :title "405 - Not allowed"}))
|
||||||
|
:not-acceptable
|
||||||
|
(constantly (error-page {:status 406, :title "406 - Not acceptable"}))}))))
|
||||||
|
|
||||||
|
(defn app []
|
||||||
|
(middleware/wrap-base #'app-routes))
|
Loading…
Reference in a new issue