fix replace-values

jaycfields · Mar 2, 2012 · 0197c30 · 0197c30
1 parent a83adb6
commit 0197c30
Show file tree

Hide file tree

Showing 2 changed files with 4 additions and 4 deletions.
diff --git a/project.clj b/project.clj
@@ -1,4 +1,4 @@
-(defproject jry "1.0.4"
+(defproject jry "1.0.5"
   :description "general clojure functions"
   :jar-name "jry.jar"
   :dependencies [[org.clojure/clojure "1.3.0"]]

diff --git a/src/jry/core.clj b/src/jry/core.clj
@@ -85,7 +85,7 @@
 (defn replace-values [m replacements]
   (reduce
    (fn [r [k v]]
-     (if (contains? m k)
-       (assoc m k v)
-       m))
+     (if (contains? r k)
+       (assoc r k v)
+       r))
    m replacements))