summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorDavid Thompson <dthompson@vistahigherlearning.com>2020-09-29 20:02:41 -0400
committerDavid Thompson <dthompson@vistahigherlearning.com>2020-09-29 20:04:20 -0400
commit07a48d5da245ce90bf20e9932f3e8afe67bfb48c (patch)
treeadabc3e0d813582f8da06b69b4316cbb7f9ec07c
parent4ca1bbe864419f4b1ac4f7dd0ae07f9fb259c07f (diff)
node: Use #:init-thunk instead of #:init-form for agenda slot.
-rw-r--r--starling/node.scm2
1 files changed, 1 insertions, 1 deletions
diff --git a/starling/node.scm b/starling/node.scm
index ce7ff80..162cd81 100644
--- a/starling/node.scm
+++ b/starling/node.scm
@@ -73,7 +73,7 @@
;; Children indexed by name for fast lookup.
(children-by-name #:getter children-by-name #:init-thunk make-hash-table)
;; Script scheduler.
- (agenda #:getter agenda #:init-form (make-agenda))
+ (agenda #:getter agenda #:init-thunk make-agenda)
;; Flips to #t upon first entering a scene.
(booted? #:accessor booted? #:init-form #f)
;; Flips to #t when node is part of current scene.