From 068d2f13f48874c59b36523c975ba2e46206e041 Mon Sep 17 00:00:00 2001
From: Andrey Antukh <niwi@niwi.nz>
Date: Tue, 4 Jul 2023 13:35:54 +0200
Subject: [PATCH] :sparkles: Add min-max validation to word-string schema

---
 common/src/app/common/schema.cljc | 1 +
 1 file changed, 1 insertion(+)

diff --git a/common/src/app/common/schema.cljc b/common/src/app/common/schema.cljc
index 92ce756e7..19e3046f8 100644
--- a/common/src/app/common/schema.cljc
+++ b/common/src/app/common/schema.cljc
@@ -466,6 +466,7 @@
 (def! ::word-string
   {:type ::word-string
    :pred #(and (string? %) (not (str/blank? %)))
+   :property-pred (m/-min-max-pred count)
    :type-properties
    {:title "string"
     :description "string"