Adding Google Authentication

core.clj

;Middleware to add authentication
(defn require-login [application] 
  (fn [request] 
    (if 
      (aeu/user-logged-in?)  
      (application request)
      (ring-response/redirect 
        (aeu/login-url))
      )))


;Adding the middleware to the app
(def app (require-login (comp-handler/api geotasklist-main-handler)))

;Defining the app
(ae/def-appengine-app geotasklist-app (var app))