luciano/mount
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

set of keys for restart listener "on-change"

Browse source
This commit is contained in:
anatoly 2016-11-02 13:54:59 -04:00
parent 7d323e727e
commit c189db9d12
1 changed files with 5 additions and 4 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

9
src/mount/core.cljc
View file

@ -314,10 +314,11 @@
(doseq [k ks]
(swap! watchers update k #(conj % state))))
(on-change [_ k]
(let [states (@watchers k)]
(apply stop states)
(apply start states))))
(on-change [_ ks]
(doseq [k ks]
(let [states (@watchers k)]
(apply stop states)
(apply start states)))))
(defn restart-listner
([]