Fixed map conforming (closes #2)

tonsky · Sep 14, 2016 · 4dbb75b · 4dbb75b
1 parent cf87962
commit 4dbb75b
Show file tree

Hide file tree

Showing 3 changed files with 3 additions and 3 deletions.
diff --git a/README.md b/README.md
@@ -9,7 +9,7 @@ Add this to your project.clj:
 ```clj
 :dependencies [
   [org.clojure/clojure "1.8.0"]
-  [clojure-future-spec "1.9.0-alpha12"]
+  [clojure-future-spec "1.9.0-alpha12-1"]
 ]
 ```
 

diff --git a/project.clj b/project.clj
@@ -1,4 +1,4 @@
-(defproject clojure-future-spec "1.9.0-alpha12"
+(defproject clojure-future-spec "1.9.0-alpha12-1"
   :description "Backport of clojure.spec for Clojure 1.8"
   :url "https://github.com/tonsky/clojure-future-spec"
   :license {:name "Eclipse Public License"

diff --git a/src/clojure/spec.clj b/src/clojure/spec.clj
@@ -780,7 +780,7 @@
      (conform* [_ m]
                (if (keys-pred m)
                  (let [reg (registry)]
-                   (loop [ret m, [[k v] & ks :as keys] m]
+                   (loop [ret m, [[k v] & ks :as keys] (seq m)]
                      (if keys
                        (let [sname (keys->specnames k)]
                          (if-let [s (get reg sname)]