   "Sent as an agent action, stops a directory-watching agent."
   [state]
   (remove-watch *agent* ::watch)
-  false)
+  nil)
 
 (defn ns-mod-time-agent
   "Creates an agent that monitors namespaces for changes to their

    :delay - time (ms) between directory scans"
  [d & options]
  (let [{:keys [reporter] :or {reporter spec-report}} options]
    (reporter (run-spec (find-namespaces-in-dir d)))
    (apply watch-dir d
           (fn [names] (reporter (run-spec names :reload)))
           options)))

                    (Thread/sleep delay)
                    (send *agent* upd)
                    (ns-mod-times dir)))]
    (doto (agent {})
      (send updater))))

(defn- newer-namespaces [older newer]
