Correct the logout error

This commit is contained in:
Simon Brooke 2018-09-23 10:43:49 +01:00
parent af7a8f7c25
commit c1dcd33d82

View file

@ -115,7 +115,7 @@
(defn handle-logout (defn handle-logout
[request] [request]
(let [r (response/found (str (:servlet-context request) "/home"))] (let [r (response/found "/home")]
(assoc r :session (dissoc (:session r) :user)))) (assoc r :session (dissoc (:session r) :user))))