X-Git-Url: https://jxself.org/git/?a=blobdiff_plain;f=mudsync%2Fgameobj.scm;h=37f8bfefa8d07ebb85be81a9e17705089703f2b8;hb=1c65eb772aaa7c3a4278b95bc02660dc79c25438;hp=351abe7c22a9094f0666938b73620f7669406ca9;hpb=8a2341e98f75a5df295f49c08485eb6339dda19e;p=mudsync.git

diff --git a/mudsync/gameobj.scm b/mudsync/gameobj.scm
index 351abe7..37f8bfe 100644
--- a/mudsync/gameobj.scm
+++ b/mudsync/gameobj.scm
@@ -146,9 +146,9 @@
   (set! (gameobj-loc actor) loc)
   ;; Change registation of where we currently are
   (if loc
-      (<- actor loc 'add-occupant! #:who (actor-id actor)))
+      (<-wait actor loc 'add-occupant! #:who (actor-id actor)))
   (if old-loc
-      (<- actor old-loc 'remove-occupant! #:who (actor-id actor))))
+      (<-wait actor old-loc 'remove-occupant! #:who (actor-id actor))))
 
 (define gameobj-get-name (simple-slot-getter 'name))
 (define gameobj-get-desc (simple-slot-getter 'desc))