status-im
/
status-mobile
mirror of https://github.com/status-im/status-mobile.git
2
0
Fork 0
Code Issues Projects Releases Wiki Activity

check uniqueness 

Former-commit-id: bb4641fc93
This commit is contained in:
Roman Volosovskyi 2016-06-22 16:29:25 +03:00
parent 163e98afee
commit fe33e694b7
1 changed files with 8 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
src/status_im/contacts/validations.cljs
View File

@ -1,9 +1,14 @@
(ns status-im.contacts.validations (ns status-im.contacts.validations
(:require [cljs.spec :as s])) (:require [cljs.spec :as s]
[status-im.persistence.realm :as realm]))
(s/def ::not-empty-string (s/and string? not-empty)) (s/def ::not-empty-string (s/and string? not-empty))
(defn unique-identity? [identity]
(println identity)
(not (realm/exists? :contacts :whisper-identity identity)))
(s/def ::name ::not-empty-string) (s/def ::unique-identity unique-identity?)
(s/def ::name (s/and ::not-empty-string ::unique-identity))
(s/def ::whisper-identity ::not-empty-string) (s/def ::whisper-identity ::not-empty-string)
(s/def ::contact (s/keys :req-un [::name ::whisper-identity] (s/def ::contact (s/keys :req-un [::name ::whisper-identity]