Penpot/penpot
0
Fork 0
mirror of https://github.com/penpot/penpot.git synced 2025-02-07 23:08:24 -05:00
Code Issues Activity

🐛 Fix email registration whitelist handling.

Browse source
This commit is contained in:
Andrey Antukh 2021-04-26 11:19:50 +02:00
parent 432d24dc94
commit 8ecc0b3cd9
2 changed files with 4 additions and 3 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

6
backend/src/app/rpc/mutations/profile.clj
View file

@ -134,11 +134,11 @@
"Returns true if email's domain is in the given whitelist or if given
whitelist is an empty string."
[whitelist email]
(if (str/blank? whitelist)
(if (str/empty-or-nil? whitelist)
true
(let [domains (str/split whitelist #",\s*")
email-domain (second (str/split email #"@"))]
(contains? (set domains) email-domain))))
domain (second (str/split email #"@" 2))]
(contains? (set domains) domain))))
(def ^:private sql:profile-existence
"select exists (select * from profile

1
frontend/shadow-cljs.edn
View file

@ -2,6 +2,7 @@
:http {:port 3448}
:nrepl {:port 3447}
:jvm-opts ["-Xmx700m" "-Xms100m" "-XX:+UseSerialGC"]
:dev-http {8888 "classpath:public"}
:builds
{:main