X-Git-Url: https://jxself.org/git/?p=mudsync.git;a=blobdiff_plain;f=mudsync%2Fgame-master.scm;h=595a9032ee391b9dc1b29dc6e4b361750490ca92;hp=3583f95662cc68a25abb72f8ddeaa4d82f689d9b;hb=8c357c87019a70aabdfadb4c71e3b063251cff87;hpb=8a2341e98f75a5df295f49c08485eb6339dda19e diff --git a/mudsync/game-master.scm b/mudsync/game-master.scm index 3583f95..595a903 100644 --- a/mudsync/game-master.scm +++ b/mudsync/game-master.scm @@ -100,7 +100,7 @@ (let ((room (apply create-actor* gm room-class "room" #:gm (actor-id gm) - #:exits (map exit-from-spec room-exits) + #:exits (map exit-from-spec (pk 'dem-exits room-exits)) room-args))) ;; register the room (hash-set! (gm-room-dir gm) room-symbol room)