        (map (fn [[child stat]]
               (vector child
                       {:created-at (java.util.Date. (:ctime stat))
-                       :modified (java.util.Date. (:mtime stat))})))
+                       :modified-at (java.util.Date. (:mtime stat))})))
        (into {})
        (reset! deployments)
        (distribute-deployments send-all-fn!)))

  (:require [clojure.core.async :refer [chan thread <!! alts!!]]
            [onyx-dashboard.dev :refer [is-dev? inject-devmode-html browser-repl start-figwheel]]
            [org.httpkit.server :as http-kit-server]
            [clojure.java.io :as io]
            [compojure.route :refer [resources]]
            [compojure.handler :refer [api]]

            [:security :anti-forgery]
            {:read-token (fn [req] (-> req :params :csrf-token))}))

(def deployments (atom {}))
(def tracking (atom {}))

;(deref tracking)

; Improve fn name
(defn job-peer-allocated-task [job-allocations job-id peer-id]
  (ffirst 
