Fix can-create? bug and log it

This commit is contained in:
Oskar Thorén 2017-11-10 21:32:38 +00:00
parent cc05f36e29
commit 764f60edcb
1 changed files with 4 additions and 3 deletions

View File

@ -260,7 +260,8 @@
:owner-avatar-url owner-avatar-url :owner-avatar-url owner-avatar-url
:repo-id repo-id :repo-id repo-id
:repo repo-name :repo repo-name
:full-repo full-repo})) :full-repo full-repo
:can-create? can-create?}))
(cond (not can-create?) (cond (not can-create?)
{:status 400 {:status 400
:body "Please join our Riot - chat.status.im/#/register and request :body "Please join our Riot - chat.status.im/#/register and request
@ -299,7 +300,7 @@
username (:login sender) username (:login sender)
owner-avatar-url (:avatar_url sender) owner-avatar-url (:avatar_url sender)
first-repo (first repositories) first-repo (first repositories)
can-create? (user-whitelisted? (:username username))] can-create? (user-whitelisted? username)]
(log/info "handle-installation created" (log/info "handle-installation created"
(pr-str {:user-id user-id (pr-str {:user-id user-id
:name username :name username
@ -320,7 +321,7 @@
username (:login sender) username (:login sender)
owner-avatar-url (:avatar_url sender) owner-avatar-url (:avatar_url sender)
first-repo (first repositories) first-repo (first repositories)
can-create? (user-whitelisted? (:username username))] can-create? (user-whitelisted? username)]
(log/info "handle-installation-integration created" (log/info "handle-installation-integration created"
(pr-str {:user-id user-id (pr-str {:user-id user-id
:name username :name username