diff options
Diffstat (limited to 'src/clojure/contrib')
| -rw-r--r-- | src/clojure/contrib/test_contrib/expect_test.clj | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/clojure/contrib/test_contrib/expect_test.clj b/src/clojure/contrib/test_contrib/expect_test.clj index 941a0d69..52f37741 100644 --- a/src/clojure/contrib/test_contrib/expect_test.clj +++ b/src/clojure/contrib/test_contrib/expect_test.clj @@ -14,7 +14,7 @@ (defmacro assert-called [fn-name called? & body] `(let [called-status?# (atom false)] - (binding [~fn-name (fn [& args#] (swap! called-status?# (fn [& args#] true)))] ~@body) + (binding [~fn-name (fn [& args#] (reset! called-status?# true))] ~@body) (is (= ~called? @called-status?#)))) (deftest test-convenience |