mount

dm3 2017-07-18T09:07:33.475552Z

realized the above is needlessly complicated:

(defn states-in-ns [ns-sym]
    (->> (vals @@#'mount.core/meta-state)
         (map :var)
         (filter #(= (namespace %) (ns-name *ns*))))

tolitius 2017-07-18T15:05:01.859414Z

your find-all-states idea is better, since it makes it less "internal":

(filter
  #(string/starts-with? % "#'app.whatever")
  (mount/find-all-states))