|  |  |  | @ -9,13 +9,14 @@ | 
		
	
		
			
				|  |  |  |  |             [wanijo.home.routes :as home-routes] | 
		
	
		
			
				|  |  |  |  |             [wanijo.schema.routes :as schema-routes] | 
		
	
		
			
				|  |  |  |  |             [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] | 
		
	
		
			
				|  |  |  |  |   (fn [req] | 
		
	
		
			
				|  |  |  |  |     (if (get-in req [:session :ident]) | 
		
	
		
			
				|  |  |  |  |       (handler req) | 
		
	
		
			
				|  |  |  |  |       (rur/redirect "/login")))) | 
		
	
		
			
				|  |  |  |  |       (rur/redirect (path :auth-login))))) | 
		
	
		
			
				|  |  |  |  | 
 | 
		
	
		
			
				|  |  |  |  | (defroutes app-routes | 
		
	
		
			
				|  |  |  |  |   (routes auth/routes) | 
		
	
	
		
			
				
					|  |  |  | 
 |