diff options
author | David Thompson <dthompson2@worcester.edu> | 2018-08-27 17:48:52 -0400 |
---|---|---|
committer | David Thompson <dthompson2@worcester.edu> | 2018-08-27 17:48:52 -0400 |
commit | 3fb20cda0eaee5c0933edadba2f2a3e54050467e (patch) | |
tree | 53e423f9bb18f76d37ebac4811fc45e1b1221631 | |
parent | 29f34c1b375418ce837de588c1c9245d79cd3b74 (diff) |
Reset agenda when node exits scene.
-rw-r--r-- | starling/node.scm | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/starling/node.scm b/starling/node.scm index 88790fa..4ce46dd 100644 --- a/starling/node.scm +++ b/starling/node.scm @@ -136,7 +136,8 @@ represented as a ratio in the range [0, 1]." (with-agenda (agenda node) (set! (active? node) #f) (on-exit node) - (for-each-child deactivate node))) + (for-each-child deactivate node) + (reset-agenda))) ;;; |