more routing subsystem

integration-tests
Josha von Gizycki 6 years ago
parent 3643dd1dc2
commit a4644e92b0

@ -9,13 +9,14 @@
[wanijo.home.routes :as home-routes] [wanijo.home.routes :as home-routes]
[wanijo.schema.routes :as schema-routes] [wanijo.schema.routes :as schema-routes]
[wanijo.framework.auth :as auth] [wanijo.framework.auth :as auth]
[wanijo.framework.devmode :as devmode])) [wanijo.framework.devmode :as devmode]
[wanijo.framework.routing :refer [path]]))
(defn- wrap-login-redirect [handler] (defn- wrap-login-redirect [handler]
(fn [req] (fn [req]
(if (get-in req [:session :ident]) (if (get-in req [:session :ident])
(handler req) (handler req)
(rur/redirect "/login")))) (rur/redirect (path :auth-login)))))
(defroutes app-routes (defroutes app-routes
(routes auth/routes) (routes auth/routes)

Loading…
Cancel
Save