summaryrefslogtreecommitdiff
path: root/starling/node.scm
diff options
context:
space:
mode:
authorDavid Thompson <dthompson2@worcester.edu>2018-08-27 17:48:52 -0400
committerDavid Thompson <dthompson2@worcester.edu>2018-08-27 17:48:52 -0400
commit3fb20cda0eaee5c0933edadba2f2a3e54050467e (patch)
tree53e423f9bb18f76d37ebac4811fc45e1b1221631 /starling/node.scm
parent29f34c1b375418ce837de588c1c9245d79cd3b74 (diff)
Reset agenda when node exits scene.
Diffstat (limited to 'starling/node.scm')
-rw-r--r--starling/node.scm3
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)))
;;;