Bumping wboss dep to fix [IMMUTANT-535]

Slight mods to tests, not sure why we didn't catch this before.
immutant · Mar 10, 2015 · 919aee2 · 919aee2
1 parent 93bb374
commit 919aee2
Show file tree

Hide file tree

Showing 2 changed files with 16 additions and 18 deletions.
diff --git a/project.clj b/project.clj
@@ -91,7 +91,7 @@
                         clj-http                   "1.0.1"
 
                         ;; org.projectodd.wunderboss  "0.4.1"
-                        org.projectodd.wunderboss  "1.x.incremental.197"
+                        org.projectodd.wunderboss  "1.x.incremental.201"
                         ;; org.projectodd.wunderboss  "0.5.0-SNAPSHOT"
 
                         org.immutant               :version}}

diff --git a/scheduling/test/immutant/scheduling_test.clj b/scheduling/test/immutant/scheduling_test.clj
@@ -62,26 +62,24 @@
                   (limit 5)))]
       (is (deref started? 5000 false))
       (is (stop env))
-      (is (not (stop env)))
-      (reset! should-run? false)))
+      (is (not (stop env)))))
 
 (deftest stop-should-take-kwargs
-    (let [started? (promise)
-          should-run? (atom true)]
-      (schedule
-        (fn []
-          (is @should-run?)
-          (deliver started? true))
-        (-> (id :foo)
-          (every 1)
-          (limit 5)))
-      (is (deref started? 5000 false))
-      (is (stop :id :foo))
-      (reset! should-run? false)))
+  (let [started? (promise)
+        should-run? (atom true)]
+    (schedule
+      (fn []
+        (is @should-run?)
+        (deliver started? true))
+      (-> (id :foo)
+        (every 10)
+        (limit 5000)))
+    (is (deref started? 5000 false))
+    (is (stop :id :foo))))
 
 (deftest stop-should-stop-the-scheduler-when-no-jobs-remain
-  (let [job1 (schedule #())
-        job2 (schedule #())
+  (let [job1 (schedule #() :every :second)
+        job2 (schedule #() :every :second)
         scheduler (.scheduler (scheduler {}))]
     (is (not (.isShutdown scheduler)))
     (stop job1)
@@ -90,7 +88,7 @@
     (is (.isShutdown scheduler))))
 
 (deftest stop-should-stop-all-threaded-jobs
-  (let [everything (-> (schedule #())
+  (let [everything (-> (schedule #() :every :second)
                      (dissoc :id)
                      (->> (schedule #()))
                      (dissoc :id)