diff options
-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))) ;;; |