;;; Hotel Bricabrac
(use-modules (mudsync)
+ (mudsync container)
(8sync actors)
(8sync agenda)
(oop goops)
(escape)))
(slot-ref gameobj 'proxy-items))
- (cmd-take-from gameobj message
- #:direct-obj direct-obj #:indir-obj indir-obj
- #:preposition preposition #:player player))))
+ (<- player 'tell
+ #:text `("You don't see any such " ,direct-obj " to take "
+ ,preposition " " ,(slot-ref gameobj 'name) ".")))))
\f
#:desc " A warm and fuzzy cuddles plushie! It's a cuddlefish!")
('playroom:toy-chest
- <gameobj> 'playroom
+ <container> 'playroom
#:name "a toy chest"
#:goes-by '("toy chest" "chest")
#:desc (lambda (toy-chest whos-looking)