Fix bug with ds/or spec generation

Closes metosin#264
dehli · Nov 13, 2021 · dc4990d · dc4990d
1 parent d05e6e3
commit dc4990d
Showing 1 changed file with 10 additions and 0 deletions.
diff --git a/test/cljc/spec_tools/data_spec_test.cljc b/test/cljc/spec_tools/data_spec_test.cljc
@@ -302,3 +302,13 @@
     (testing "nested maps have a name"
       (let [spec (st/get-spec :spec-tools.data-spec-test$named3/map)]
         (is (and spec (:name spec)))))))
+
+(def issue-264-spec
+  (ds/spec {:name ::issue-264
+            :spec {:map (ds/or {:map1 {:kw1 keyword?}
+                                :map2 {:kw2 keyword?}})}}))
+
+(deftest issue-264
+  (testing "doesn't strip nested keys"
+    (is (= {:map {:kw1 :foo}}
+           (st/select-spec issue-264-spec {:map {:kw1 :foo}})))))