From: Christopher Allan Webber Date: Sun, 29 Jan 2017 22:25:29 +0000 (-0600) Subject: oops fix actor -> gameobj X-Git-Tag: fosdem-2017~46 X-Git-Url: https://jxself.org/git/?p=mudsync.git;a=commitdiff_plain;h=dac87df0a26534290c30ea79c664594f2d8fe582 oops fix actor -> gameobj I ought to do this for all of them... --- diff --git a/mudsync/gameobj.scm b/mudsync/gameobj.scm index 9e331da..33d9cd0 100644 --- a/mudsync/gameobj.scm +++ b/mudsync/gameobj.scm @@ -114,7 +114,7 @@ (props #:init-thunk make-hash-table) ;; gameobjs may inherit an initial list of these via the ;; initial-props slot, which must always have its - ;; #:allocation #:each-subclass and use (wrap-rmeta-slot). + ;; #:allocation #:each-subclass and use (build-rmeta-slot). ;; The vanilla gameobj has no props, on purpose. (initial-props #:allocation #:each-subclass #:init-thunk (build-rmeta-slot '())) @@ -228,10 +228,10 @@ (gameobj-setup-props actor) (run-replacement actor replace gameobj-replace-steps*)) -(define* (gameobj-get-prop actor key #:optional dflt) +(define* (gameobj-get-prop gameobj key #:optional dflt) (hashq-ref (slot-ref gameobj 'props) key dflt)) -(define* (gameobj-set-prop! actor key val) +(define* (gameobj-set-prop! gameobj key val) (hashq-set! (slot-ref gameobj 'props) key val)) (define* (gameobj-act-get-prop actor message key #:optional dflt)