Port sequence check into conform.

clojure · Sep 23, 2016 · 7ef1ed8 · 7ef1ed8
1 parent 4c51575
commit 7ef1ed8
Showing 1 changed file with 2 additions and 1 deletion.
diff --git a/src/main/cljs/cljs/spec.cljs b/src/main/cljs/cljs/spec.cljs
@@ -692,7 +692,8 @@
                        (assoc ret (nth (if conform-keys cv v) 0) (nth cv 1))))
                    identity]
 
-                  (list? x) [empty addcv reverse]
+                  (c/or (list? conform-into) (seq? conform-into) (c/and (not conform-into) (c/or (list? x) (seq? x))))
+                  [empty addcv reverse]
 
                   :else [#(empty (c/or conform-into %)) addcv identity]))]
      (reify