Altered: s/campaign/adventure globally

1 files changed, 9 insertions, 4 deletions

diff --git a/src/endpoints.lisp b/src/endpoints.lisp
index dbfb455..5b65ff7 100644
--- a/src/endpoints.lisp
+++ b/src/endpoints.lisp
@@ -130,10 +130,15 @@ functions in url parameters in endpoint definitions."
       (birth-from-the-goddess-loins player name)
       (redirect-to "/tavern"))))
 
-(defendpoint* :post "/new-campaign" () ()
+(defendpoint* :get "/adventure-awaits" () ()
+  (with-session (player)
+    (render (page-render-mode)
+            (make-instance 'new-adventure))))
+
+(defendpoint* :post "/adventure-awaits" () ()
   (with-session (creator)
     (with-checked-plist ((title :title 'a-short-string)) (lzb:request-body)
-      (let ((campaign
-              (create-campaign creator title)))
-        (redirect-to (urlpath campaign))))))
+      (let ((adventure
+              (create-adventure creator title)))
+        (redirect-to (urlpath adventure))))))