X-Git-Url: https://jxself.org/git/?p=mudsync.git;a=blobdiff_plain;f=worlds%2Fbricabrac.scm;h=ee0ff08806fee83f987274839ce00123df610225;hp=5676c1004245d9798002d53687bbeedd10cfa8bf;hb=74f3d0ded31d7622c9fdaea29687850449ffd5e7;hpb=cc0dc06ed2164992bf9e37917db628fcf82e6d14

diff --git a/worlds/bricabrac.scm b/worlds/bricabrac.scm
index 5676c10..ee0ff08 100644
--- a/worlds/bricabrac.scm
+++ b/worlds/bricabrac.scm
@@ -19,6 +19,7 @@
 ;;; Hotel Bricabrac
 
 (use-modules (mudsync)
+             (mudsync container)
              (8sync actors)
              (8sync agenda)
              (oop goops)
@@ -61,8 +62,7 @@
       #:text (string-append (slot-ref actor 'read-text) "\n")))
 
 
-;; This one allows you to take from 
-
+;; This one allows you to take from items that are proxied by it
 (define-actor <proxy-items> (<gameobj>)
   ((cmd-take-from take-from-proxy))
   (proxy-items #:init-keyword #:proxy-items))
@@ -82,9 +82,9 @@
           (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) ".")))))
 
 
 
@@ -525,7 +525,7 @@ if this room is intended for children or child-like adults."
     #: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)