From fbbc53e052d07dc7ec600028dd120ee23d918211 Mon Sep 17 00:00:00 2001
From: David Thompson <dthompson@vistahigherlearning.com>
Date: Tue, 29 Sep 2020 20:01:57 -0400
Subject: node: Use for-each-child in reboot method.

---
 starling/node.scm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

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
-- 
cgit v1.2.3