X-Git-Url: https://jxself.org/git/?a=blobdiff_plain;ds=sidebyside;f=mudsync%2Fgameobj.scm;h=334f4397593054d71c744ee062e40c850909be34;hb=cd40c01c4ac301e7d991e4df4d17d2c693d11d05;hp=20fc291340198c25e12ad2c718c985e55ad35c42;hpb=242f214ff5d4e3c0df4687799819c104e7fb1a78;p=mudsync.git diff --git a/mudsync/gameobj.scm b/mudsync/gameobj.scm index 20fc291..334f439 100644 --- a/mudsync/gameobj.scm +++ b/mudsync/gameobj.scm @@ -127,8 +127,8 @@ ;; Kind of a useful utility, maybe? (define (simple-slot-getter slot) (lambda (actor message) - (reply-message actor message - #:val (slot-ref actor slot)))) + (<-reply actor message + #:val (slot-ref actor slot)))) (define (gameobj-replace-step-occupants actor replace-reply) (define occupants