X-Git-Url: https://jxself.org/git/?p=mudsync.git;a=blobdiff_plain;f=mudsync%2Fgame-master.scm;h=9ced9fadfdf5b4ee90259e145e9b19f75c843acb;hp=3424f12336bf2078f9b58c30d04230ebb6fe0184;hb=43b6ac4e8ceff7aad909294b1b00ebdd6a38ec15;hpb=c4fbe0119751407183f541fa64f850e6b7404d97 diff --git a/mudsync/game-master.scm b/mudsync/game-master.scm index 3424f12..9ced9fa 100644 --- a/mudsync/game-master.scm +++ b/mudsync/game-master.scm @@ -206,11 +206,14 @@ with an anonymous persona" #:name guest-name #:gm (actor-id gm) #:client client-id))) - (display "Are we broke yet?\n") ;; Register the player in our database of players -> connections (gm-register-client! gm client-id player) ;; Dump the player into the default room (<-wait gm player 'set-loc! #:loc room-id) ;; Initialize the player - (<- gm player 'init))))) + (<-wait gm player 'init) + (<- gm room-id 'tell-room + #:text (format #f "You see ~a materialize out of thin air!\n" + guest-name) + #:exclude player)))))