diff options
Diffstat (limited to 'src/endpoints.lisp')
-rw-r--r-- | src/endpoints.lisp | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/endpoints.lisp b/src/endpoints.lisp index 62d70ee..acc62c9 100644 --- a/src/endpoints.lisp +++ b/src/endpoints.lisp @@ -116,11 +116,11 @@ functions in url parameters in endpoint definitions." (new-sesh player))) (lzb:set-response-cookie +session-cookie-name+ (session-id sesh) - :path "/" :domain "localhost") ; TODO: generalize domain + :path "/" :domain (host *config*)) (redirect-to "/tavern")) (progn (flash :tavern-door (format nil "Hrmm... ~a you say? It ain't on the register." nick)) - (redirect-to "/tavern-door")))) ) + (redirect-to "/tavern-door"))))) (defendpoint* :get "/join" () () (render (page-render-mode) :join)) |