diff --git a/backend/src/uxbox/util/spec.clj b/backend/src/uxbox/util/spec.clj index 5acecd4246..311f73db9a 100644 --- a/backend/src/uxbox/util/spec.clj +++ b/backend/src/uxbox/util/spec.clj @@ -31,6 +31,12 @@ :context (s/explain-data spec data)) result))) +(defn valid? + [spec data] + (if (s/valid? spec data) + true + (s/explain spec data))) + ;; --- Predicates (defn email?