added dynamic linking approach to exits. live hacking rooms works! :D :D

[mudsync.git] / worlds / bricabrac.scm

diff --git a/worlds/bricabrac.scm b/worlds/bricabrac.scm
index 3584e87c15dd0376bf91e3b5d16edfbd1936c6fc..f95ebd9ab51f4dc61817e7a57fdee2607e61e99e 100644 (file)
--- a/worlds/bricabrac.scm
+++ b/worlds/bricabrac.scm
@@ -79,7 +79,8 @@
 
 (define chat-commands
   (list
-   (direct-command "chat" 'cmd-chat)))
+   (direct-command "chat" 'cmd-chat)
+   (direct-command "talk" 'cmd-chat)))
 (define chat-actions
   (build-actions
    (cmd-chat (wrap-apply npc-chat-randomly))))
@@ -182,7 +183,7 @@ kind of objects they found lying around.
     #:exits
     (list (make <exit>
             #:name "north"
-            #:to-symbol 'room:grand-hallway)))
+            #:to 'room:grand-hallway)))
    ;; NPC: hotel owner
    ('npc:hotel-owner
     <chatty-npc> 'room:lobby
@@ -259,7 +260,7 @@ they're all boarded up.  Guess this is still a work in progress, huh?"
     #:exits
     (list (make <exit>
             #:name "south"
-            #:to-symbol 'room:lobby))
+            #:to 'room:lobby))
     )))
 
 \f
@@ -296,6 +297,7 @@ they're all boarded up.  Guess this is still a work in progress, huh?"
 (define game-spec
   (append lobby grand-hallway))
 
+;; TODO: Provide command line args
 (define (run-game . args)
-  (run-demo "/tmp/bricabrac-game.db" game-spec 'room:lobby))
+  (run-demo game-spec 'room:lobby #:repl-server #t))