mirror of
https://github.com/penpot/penpot.git
synced 2025-06-05 10:01:38 +02:00
✨ Improve login accessibility
This commit is contained in:
parent
8bc265a598
commit
95a18fce8d
20 changed files with 978 additions and 251 deletions
|
@ -24,10 +24,10 @@
|
|||
(s/def ::email-2 ::us/email)
|
||||
|
||||
(defn- email-equality
|
||||
[data]
|
||||
[errors data]
|
||||
(let [email-1 (:email-1 data)
|
||||
email-2 (:email-2 data)]
|
||||
(cond-> {}
|
||||
(cond-> errors
|
||||
(and email-1 email-2 (not= email-1 email-2))
|
||||
(assoc :email-2 {:message (tr "errors.email-invalid-confirmation")}))))
|
||||
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue