   (tp-get-data [this])
   (tp-show-stats [this]))
 
-(def paths-info (atom {}))
+(def paths-info (atom nil))
 
 (defn- set-inspecting-on!
   "Set the inspecting flag on."

                                            tpool)
            obsolete-paths (->> processed-data
                                (get-paths-from-paths-rollups (first rollups))
                                (filter #(:leaf (get @paths-info %)))
                                (sort))]
        (process-paths tenant obsolete-paths pstore options
                       remove-obsolete-paths-processor tpool)))
    (catch Exception e

(defn- collect-path-info
  "Add a path to the paths info database."
  [path]
  (when (:leaf path)
    (swap! paths-info conj (:path path))))

(defn- remove-obsolete-metrics-processor
  "Obsolete metrics removal processor."
