(define (run-replacement actor replaces replace-steps)
(when replaces
- (msg-receive (_ #:key occupants)
+ (mbody-receive (_ #:key occupants)
(<-wait replaces 'assist-replace)
(for-each
(lambda (replace-step)
(match special-symbol
;; if it's a symbol, look it up dynamically
((? symbol? _)
- (msg-val (<-wait (slot-ref gameobj 'gm) 'lookup-special
- #:symbol special-symbol)))
+ (mbody-val (<-wait (slot-ref gameobj 'gm) 'lookup-special
+ #:symbol special-symbol)))
;; if it's false, return nothing
(#f #f)
;; otherwise it's probably an address, return it as-is