Skip to content

Commit

Permalink
More assertions
Browse files Browse the repository at this point in the history
  • Loading branch information
michaelklishin committed May 29, 2012
1 parent ddd161d commit 2ddd598
Showing 1 changed file with 5 additions and 0 deletions.
Original file line number Diff line number Diff line change
Expand Up @@ -77,8 +77,13 @@
(t/with-schedule (s/schedule
(s/with-repeat-count 10)
(s/with-interval-in-milliseconds 400))))]
(is (not (sched/all-scheduled? jk tk)))
(is (not (sched/scheduled? jk)))
(is (not (sched/scheduled? tk)))
(sched/schedule job trigger)
(is (sched/all-scheduled? jk tk))
(is (sched/scheduled? jk))
(is (sched/scheduled? tk))
(is (not (empty? (sched/get-triggers [tk]))))
(is (not (empty? (sched/get-jobs [jk]))))
(let [t (sched/get-trigger tk)
Expand Down

0 comments on commit 2ddd598

Please sign in to comment.