Allow auto-running reaction to be watched

This commit is contained in:
Dan Holmsand 2015-02-01 20:26:18 +01:00
parent 9d0d0680ec
commit 81dfa7c682
1 changed files with 2 additions and 1 deletions

View File

@ -205,7 +205,8 @@
(-remove-watch [this k] (-remove-watch [this k]
(set! watches (dissoc watches k)) (set! watches (dissoc watches k))
(when (empty? watches) (when (and (empty? watches)
(not auto-run))
(dispose! this))) (dispose! this)))
IReset IReset