wait to inject each object before we inject the next one

diff --git a/mudsync/run-game.scm b/mudsync/run-game.scm
index 0fed48d0c51f3a43182aff45d953a368d0ad09a7..c9d1f423a31262e6004480c7ea5c91c1480d289d 100644 (file)
--- a/mudsync/run-game.scm
+++ b/mudsync/run-game.scm
@@ -69,9 +69,9 @@
   (while (not (q-empty? %inject-queue))
     (match (deq! %inject-queue)
       ((gameobj-spec . special-symbol)
-       (<- (.gm injector) 'inject-special!
-           #:special-symbol special-symbol
-           #:gameobj-spec gameobj-spec)))))
+       (<-wait (.gm injector) 'inject-special!
+               #:special-symbol special-symbol
+               #:gameobj-spec gameobj-spec)))))
 
 \f
 ;;; Game running stuff