Move input to end of pred function

This commit is contained in:
bom 2022-07-27 11:53:10 +02:00
parent cbe4d0f9eb
commit e28ccabf72

View file

@ -15,7 +15,7 @@
(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 string-of-separated-by? (defn string-of-separated-by?
[input spec-function separator] [spec-function separator input]
(every? true? (map spec-function (str/split input separator)))) (every? true? (map spec-function (str/split input separator))))
(defn letsencrypt-issuer? (defn letsencrypt-issuer?