prevent reloading of mount.core ns - fix https://github.com/tolitius/mount/issues/106

This commit is contained in:
krajj7 2019-01-26 12:42:50 +01:00
parent c5f3e4cdf8
commit fb52f79396

View file

@ -1,4 +1,5 @@
(ns mount.core
#?(:clj {:clojure.tools.namespace.repl/load false}) ; prevent reloading of this ns
#?(:clj (:require [mount.tools.macro :refer [on-error throw-runtime] :as macro]
[mount.tools.macrovich :refer [deftime]]
[mount.tools.logger :refer [log]]
@ -17,10 +18,6 @@
(defonce ^:private meta-state (atom {}))
(defonce ^:private running (atom {})) ;; to clean dirty states on redefs
;; supporting tools.namespace: (disable-reload!)
#?(:clj
(alter-meta! *ns* assoc ::load false)) ;; to exclude the dependency
(defn- make-state-seq [state]
(or (:order (@meta-state state))
(swap! state-seq inc)))