fix params

This commit is contained in:
flynn 2019-02-14 03:26:33 +01:00
parent 8e63cf8911
commit 59fccd2cdb
2 changed files with 6 additions and 4 deletions

View File

@ -11,9 +11,8 @@
{:client-id (env :oauth-consumer-key)
:client-secret (env :oauth-consumer-secret)
:authorize-uri (env :authorize-uri)
:redirect_uri (str (env :app-host) "/oauth/oauth-callback")
:redirect-uri (str (env :app-host) "/oauth/oauth-callback")
:access-token-uri (env :access-token-uri)
;:scope "activity profile"
})
; To authorize, redirect the user to the sign in / grant page
@ -42,6 +41,7 @@
"let the user authorize access by redirecting to the signin / grant page
of the used oauth api"
[]
(log/info "Oauth params: " (oauth2-params))
(authorize-uri (oauth2-params)))
(defn get-authentication-response

View File

@ -29,8 +29,10 @@
(defn oauth-init
"Initiates the Twitter OAuth"
[request]
(-> (mo/authorize-api-uri)
found))
(let [reee (mo/authorize-api-uri)]
(log/info "authorize uri: " reee)
(-> reee
found)))
(defn oauth-callback
"Handles the callback from adams with the access_token