adjust tests for :try not being in default-options any more

joegallo · Mar 26, 2012 · 400f9da · 400f9da
1 parent b2b6453
commit 400f9da
Showing 1 changed file with 2 additions and 1 deletion.
diff --git a/test/robert/test/bruce.clj b/test/robert/test/bruce.clj
@@ -91,10 +91,11 @@
   (testing "success returns a result"
     (is (= 2 (retry default-options #(+ 1 1)))))
   (testing "failure returns a fn"
-    (is (fn? (retry (assoc default-options :sleep nil) #(/ 1 0)))))
+    (is (fn? (retry (assoc default-options :try 1 :sleep nil) #(/ 1 0)))))
   (testing "unless you have run out of tries"
     (is (thrown? ArithmeticException
                  (retry (assoc default-options
+                          :try 1
                           :sleep nil
                           :tries 1)
                         #(/ 1 0))))))