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

✨ Ensure that all emails are under 250chars

Browse source
This commit is contained in:
Andrey Antukh 2023-07-04 13:21:05 +02:00
parent 7b0d3bdcab
commit 1464f5da90
1 changed files with 3 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

4
common/src/app/common/schema.cljc
View file

@ -282,7 +282,9 @@
(def! ::email (def! ::email
{:type ::email {:type ::email
:pred (fn [s] :pred (fn [s]
(and (string? s) (re-seq email-re s))) (and (string? s)
(< (count s) 250)
(re-seq email-re s)))
:type-properties :type-properties
{:title "email" {:title "email"
:description "string with valid email address" :description "string with valid email address"