diff options
author | colin <colin@cicadas.surf> | 2023-02-20 08:00:45 -0800 |
---|---|---|
committer | colin <colin@cicadas.surf> | 2023-02-20 08:00:45 -0800 |
commit | ab5aa5bbe2a74fd83cd8f49c85595cdb25f34667 (patch) | |
tree | 537456ff1cfca695fdad2962be25a23818dae478 /endpoints.lisp | |
parent | f35d764e8269b407f4be84a304af20af7119b0f2 (diff) |
Modify: hero creation endpoint and transaction
Diffstat (limited to 'endpoints.lisp')
-rw-r--r-- | endpoints.lisp | 11 |
1 files changed, 6 insertions, 5 deletions
diff --git a/endpoints.lisp b/endpoints.lisp index 4bbc4f7..f734e37 100644 --- a/endpoints.lisp +++ b/endpoints.lisp @@ -74,13 +74,14 @@ I.e. It should be called within the scope of a request handler." (godess-shrine)) -(defendpoint* :post "/godess-shrine" () () - (with-plist ((name :name)) (lzb:request-body) - (birth-from-the-goddess-loins name) - (redirect-to "/tavern-door"))) - ;;; SESSION ENDPOINTS (defendpoint* :get "/tavern" () () (with-session (player) (tavern player))) + +(defendpoint* :post "/godess-shrine" () () + (with-session (player) + (with-plist ((name :name)) (lzb:request-body) + (birth-from-the-goddess-loins player name) + (redirect-to "/tavern")))) |