diff options
Diffstat (limited to 'endpoints.lisp')
-rw-r--r-- | endpoints.lisp | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/endpoints.lisp b/endpoints.lisp index e33a362..af07f6e 100644 --- a/endpoints.lisp +++ b/endpoints.lisp @@ -54,7 +54,7 @@ I.e. It should be called within the scope of a request handler." `(a:if-let (,session (current-session)) (let ((,player (session-player ,session))) (declare (ignorable ,player)) - ,@body) + ,@body) (redirect-to ,redirect)))) @@ -125,8 +125,8 @@ functions in url parameters in endpoint definitions." ;;; SESSION ENDPOINTS (defendpoint* :get "/tavern" () () - (with-session (player) - (tavern player))) + (with-session (me) + (tavern me))) (defendpoint* :get "/godess-shrine" () () (with-session (player) |