Update name of list-of-separated-by?
This commit is contained in:
parent
9a065943c9
commit
980eec3158
1 changed files with 1 additions and 1 deletions
|
@ -14,7 +14,7 @@
|
||||||
(and (string? input)
|
(and (string? input)
|
||||||
(some? (re-matches #"(?=^.{4,253}$)(^((?!-)[a-zA-Z0-9-]{0,62}[a-zA-Z0-9]\.)+[a-zA-Z]{2,63}$)" input))))
|
(some? (re-matches #"(?=^.{4,253}$)(^((?!-)[a-zA-Z0-9-]{0,62}[a-zA-Z0-9]\.)+[a-zA-Z]{2,63}$)" input))))
|
||||||
|
|
||||||
(defn list-of-separated-by?
|
(defn string-of-separated-by?
|
||||||
[input spec-function separator]
|
[input spec-function separator]
|
||||||
(every? true? (map spec-function (str/split input separator))))
|
(every? true? (map spec-function (str/split input separator))))
|
||||||
|
|
||||||
|
|
Loading…
Reference in a new issue