Adjust error reporting thresholds

This commit is contained in:
Andrey Antukh 2023-11-21 13:35:19 +01:00
parent 3dc629d2ad
commit d1fba8982e
2 changed files with 3 additions and 3 deletions

View file

@ -71,7 +71,7 @@
(when-let [data (some-> data (dissoc ::s/problems ::s/value ::s/spec ::sm/explain :hint))]
{:data (pp/pprint-str data :width 200)})
(when-let [explain (ex/explain data {:level 10 :length 50})]
(when-let [explain (ex/explain data {:level 8 :length 20})]
{:explain explain})))))
(defn error-record?