aboutsummaryrefslogtreecommitdiff
path: root/src/clojure/contrib/test_contrib/mock_test/test_adapter_test.clj
diff options
context:
space:
mode:
Diffstat (limited to 'src/clojure/contrib/test_contrib/mock_test/test_adapter_test.clj')
-rw-r--r--src/clojure/contrib/test_contrib/mock_test/test_adapter_test.clj4
1 files changed, 2 insertions, 2 deletions
diff --git a/src/clojure/contrib/test_contrib/mock_test/test_adapter_test.clj b/src/clojure/contrib/test_contrib/mock_test/test_adapter_test.clj
index 5dc3a43d..5f21ce11 100644
--- a/src/clojure/contrib/test_contrib/mock_test/test_adapter_test.clj
+++ b/src/clojure/contrib/test_contrib/mock_test/test_adapter_test.clj
@@ -4,8 +4,8 @@
clojure.test))
(deftest test-report-problem-called
- (def #^{:private true} fn1 (fn [x] "dummy code"))
- (def #^{:private true} fn2 (fn [x y] "dummy code2"))
+ (def #^{:private true :dynamic true} fn1 (fn [x] "dummy code"))
+ (def #^{:private true :dynamic true} fn2 (fn [x y] "dummy code2"))
(let [under-test (fn [x] (fn1 x))]
(assert-called clojure.contrib.mock.test-adapter/report-problem
true (expect [fn1 (times 5)] (under-test "hi")))))