                been reloaded."
   [& options]
   (let [{:keys [after]} options]
-    (when after
-      (assert (symbol? after) ":after value must be a symbol")
-      (assert (namespace after)
-              ":after value must be a namespace-qualified symbol"))
     (do-refresh dir/scan after)))
 
 (defn refresh-all

  reloads them in dependency order.

  The directories to be scanned are controlled by 'set-refresh-dirs';
  defaults to all directories on the Java classpath."
  []
  (do-refresh dir/scan-all))

(defn set-refresh-dirs
  "Sets the directories which are scanned by 'refresh'. Supports the

      (update-in [::track/load] #(remove load-disabled? %))))

(defn- do-refresh [scan-fn after-sym]
  (when after-sym
    (assert (symbol? after-sym) ":after value must be a symbol")
    (assert (namespace after-sym)
            ":after value must be a namespace-qualified symbol"))
  (let [current-ns (ns-name *ns*)]
    (alter-var-root #'refresh-tracker
                    #(apply scan-fn % refresh-dirs))
