Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with
or
.
Download ZIP
Browse files

Merge branch 'master' of https://github.com/PetrGlad/friend

  • Loading branch information...
commit 2dc22f71426146e3dc73fa50356a5006bae8dac3 2 parents 5c3e743 + f2ccfa1
@cemerick authored
Showing with 1 addition and 1 deletion.
  1. +1 −1  src/cemerick/friend.clj
View
2  src/cemerick/friend.clj
@@ -227,7 +227,7 @@ Equivalent to (complement current-authentication)."}
[& body]
(let [[unauthorized-info body] (if (map? (first body)) body [nil body])]
`(if (current-authentication *identity*)
- ~@body
+ (do ~@body)
(#'throw-unauthorized *identity* (merge ~unauthorized-info
{::exprs (quote [~@body])
::type :unauthenticated})))))
Please sign in to comment.
Something went wrong with that request. Please try again.