3pp-mirror/penpot
1
0
Fork 0
mirror of https://github.com/penpot/penpot.git synced 2025-06-08 23:41:38 +02:00
Code Issues Projects Releases Packages Wiki Activity

🎉 Add invitation section to dashboard

Browse source
This commit is contained in:
Migara 2022-02-17 11:57:25 +01:00 • committed by Andrey Antukh
parent 486d89c5d0
commit 9d04dc7d9a
16 changed files with 480 additions and 64 deletions
Download patch file Download diff file Expand all files Collapse all files

7
backend/src/app/rpc/queries/teams.clj
View file

@ -238,11 +238,12 @@
(s/keys :req-un [::profile-id ::team-id]))
(def sql:team-invitations
"select email_to as email, role, (valid_until < now()) as expired from team_invitation where team_id = ?")
"select email_to as email, role, (valid_until < now()) as expired
from team_invitation where team_id = ? order by valid_until desc")
(sv/defmethod ::team-invitations
[{:keys [pool] :as cfg} {:keys [profile-id team-id]}]
(with-open [conn (db/open pool)]
(check-read-permissions! conn profile-id team-id)
(db/exec! conn [sql:team-invitations team-id])))
(->> (db/exec! conn [sql:team-invitations team-id])
(mapv #(update % :role keyword)))))