oops fix actor -> gameobj
authorChristopher Allan Webber <cwebber@dustycloud.org>
Sun, 29 Jan 2017 22:25:29 +0000 (16:25 -0600)
committerChristopher Allan Webber <cwebber@dustycloud.org>
Sun, 29 Jan 2017 22:25:29 +0000 (16:25 -0600)
I ought to do this for all of them...

mudsync/gameobj.scm

index 9e331da1466647cb8a022f562531af8fa3eb0a50..33d9cd04af3dc33b1e49fb1067362bc7979ae0d4 100644 (file)
   (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 '()))
   (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)