temp trace: "mounting.. state name"

This commit is contained in:
anatoly 2016-04-26 16:07:00 -04:00
parent afe96e9aad
commit e34a164c2e

View file

@ -144,6 +144,7 @@
:status #{:stopped}}
stop (assoc :stop `(fn [] ~stop)))]
`(do
(log (str "|| mounting... " ~state-name))
(~'defonce ~state (DerefableState. ~state-name))
(mount-it (~'var ~state) ~state-name ~s-meta)
(~'var ~state))))))