diff options
| author | David Thompson <dthompson@vistahigherlearning.com> | 2020-09-29 20:01:57 -0400 |
|---|---|---|
| committer | David Thompson <dthompson@vistahigherlearning.com> | 2020-09-29 20:04:20 -0400 |
| commit | fbbc53e052d07dc7ec600028dd120ee23d918211 (patch) | |
| tree | 67bcfdd819ecb18429a6b3071dc9f07435e944f3 | |
| parent | 9d5f050f521980b1ea87fc05f5316bf7b8514092 (diff) | |
node: Use for-each-child in reboot method.
| -rw-r--r-- | starling/node.scm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/starling/node.scm b/starling/node.scm index 2982e31..dd94220 100644 --- a/starling/node.scm +++ b/starling/node.scm @@ -148,7 +148,7 @@ represented as a ratio in the range [0, 1]." (define-method (reboot (node <node>)) (define (do-reboot) - (for-each detach (children node)) + (for-each-child detach node) (with-agenda (agenda node) (reset-agenda)) (on-boot node)) (cond |