✨ Ensure that all emails are under 250chars

2026-09-24 15:48:28 +08:00 · 2023-07-04 13:55:58 +02:00
parent 7b0d3bdcab
commit 1464f5da90
1 changed files with 3 additions and 1 deletions
@@ -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"