27 lines
944 B
Clojure
27 lines
944 B
Clojure
(ns {{namespace}}.handler
|
|
(:require [compojure.core :as comp]
|
|
[compojure.route :as route]
|
|
[ring.middleware.params :refer [wrap-params]]
|
|
[ring.middleware.reload :refer [wrap-reload]]
|
|
[ring.middleware.resource :refer [wrap-resource]]
|
|
[ring.middleware.session :refer [wrap-session]]
|
|
[ring.middleware.cookies :refer [wrap-cookies]]
|
|
[{{namespace}}.response :as r]
|
|
[{{namespace}}.views.base :as v]))
|
|
|
|
(def routes
|
|
(comp/routes
|
|
(comp/GET "/" [:as req] (-> (r/response :ok :html "<h1>Hello World!<h1>")
|
|
(assoc :session (req :session))))
|
|
(route/not-found (r/response :not-found :plain "Not found."))))
|
|
|
|
(def app (-> routes
|
|
(wrap-resource "public")
|
|
wrap-cookies
|
|
wrap-session
|
|
wrap-params))
|
|
|
|
(def reloadable-app
|
|
(-> app
|
|
wrap-reload))
|