0
Fork 0
mirror of https://github.com/penpot/penpot.git synced 2025-02-10 00:58:26 -05:00

Ensure that all emails are under 250chars

This commit is contained in:
Andrey Antukh 2023-07-04 13:21:05 +02:00
parent 7b0d3bdcab
commit 1464f5da90

View file

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