diff --git a/src/malli/poly2.cljc b/src/malli/poly2.cljc index d134c4ff7..be1c4bfee 100644 --- a/src/malli/poly2.cljc +++ b/src/malli/poly2.cljc @@ -28,10 +28,10 @@ (-> (m/ast options) (update :registry #(not-empty (into {} (map (fn [[k ast]] - (-> ast - (m/from-ast options) - (m/-walk this (conj path :registry k) options) - (m/ast options)))) + [k (-> ast + (m/from-ast options) + (m/-walk this (conj path :registry k) options) + (m/ast options))])) %))) (m/from-ast options)))] (m/-walk s this path options)))