From c978d406b449ad3c3bc507f17278765b92323a0e Mon Sep 17 00:00:00 2001 From: Dave Della Costa Date: Sun, 29 Jun 2014 15:14:20 +0900 Subject: [PATCH] small tweak to stuarth's refactoring --- src/friend_oauth2/workflow.clj | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/src/friend_oauth2/workflow.clj b/src/friend_oauth2/workflow.clj index b637451..ce19601 100644 --- a/src/friend_oauth2/workflow.clj +++ b/src/friend_oauth2/workflow.clj @@ -20,8 +20,8 @@ "POSTs request to OAauth2 provider for authorization token." [{:keys [uri-config access-token-parsefn]} code] (let [access-token-uri (:access-token-uri uri-config) - query-map (assoc (util/replace-authz-code access-token-uri code) - :grant_type "authorization_code") + query-map (-> (util/replace-authz-code access-token-uri code) + (assoc :grant_type "authorization_code")) token-parse-fn (or access-token-parsefn util/extract-access-token)] (token-parse-fn (client/post (:url access-token-uri) {:form-params query-map}))))