From 2be10a3b137d7bcc75b02884ddbe72608f85f9b0 Mon Sep 17 00:00:00 2001 From: colin Date: Mon, 20 Feb 2023 17:49:42 -0800 Subject: Refactor: to use render protocol --- endpoints.lisp | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) (limited to 'endpoints.lisp') 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) -- cgit v1.2.3