fix

metosin · Jul 19, 2024 · 2d0a5c7 · 2d0a5c7
1 parent 45f0bde
commit 2d0a5c7
Showing 1 changed file with 4 additions and 4 deletions.
diff --git 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)))