Skip to content
Snippets Groups Projects
Commit e6ba511c authored by Simon Belak's avatar Simon Belak
Browse files

Add a comment explaining the watch

parent 326f43ce
No related branches found
No related tags found
No related merge requests found
......@@ -20,6 +20,8 @@
(when (>= (- (System/currentTimeMillis) start#) *max-while-runtime*)
(log/warn "While loop terminated due to exceeded max runtime."))))
;; We collect when jobs finish so we don't have to spam the DB while
;; waiting/checking for the job to finish.
(def ^:private job-done? (atom #{}))
(add-watch (deref #'async/running-jobs) :done-watch
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment