Update to use #:init-thunk instead of #:init-value on actions slot

[mudsync.git] / mudsync / player.scm

diff --git a/mudsync/player.scm b/mudsync/player.scm
index a450038d53ac64d0206b25bb8e993400a3f16a75..bfa7ca88b0e8911810a43246cbe59ad905ba0845 100644 (file)
--- a/mudsync/player.scm
+++ b/mudsync/player.scm
@@ -51,7 +51,7 @@
   (self-commands #:init-value (wrap player-self-commands))
 
   (actions #:allocation #:each-subclass
-           #:init-value
+           #:init-thunk
            (build-actions
             (init player-init)
             (handle-input player-handle-input)