summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorDavid Thompson <dthompson2@worcester.edu>2022-12-27 08:56:42 -0500
committerDavid Thompson <dthompson2@worcester.edu>2022-12-27 08:56:42 -0500
commit38830c4514949f06cdbf05b2d67e82080654fa70 (patch)
tree87a5ec6b533211d21fcba6773656fb8b70b9c8ba
parent426fd37f5f8b22c157628a26391b379b555abd0e (diff)
node: Add #:children initarg.
-rw-r--r--catbird/node.scm1
1 files changed, 1 insertions, 0 deletions
diff --git a/catbird/node.scm b/catbird/node.scm
index 6899d7d..998fe58 100644
--- a/catbird/node.scm
+++ b/catbird/node.scm
@@ -76,6 +76,7 @@
(define-method (initialize (node <node>) initargs)
(next-method)
+ (apply attach-to node (get-keyword #:children initargs '()))
(on-boot node))
(define-method (sort-children (node <node>))