diff options
Diffstat (limited to 'src/game/tavern.lisp')
| -rw-r--r-- | src/game/tavern.lisp | 18 |
1 files changed, 5 insertions, 13 deletions
diff --git a/src/game/tavern.lisp b/src/game/tavern.lisp index 25d6ef0..5997218 100644 --- a/src/game/tavern.lisp +++ b/src/game/tavern.lisp @@ -2,6 +2,9 @@ (in-package :dnd) + +;;; PAGES & PAGE CLASSES + (defclass/std tavern () ((player))) @@ -21,13 +24,9 @@ (:a :href "/adventure-awaits" "Embark on a new Adventure!")))) -(defclass/std tavern-adventures () - ((your-adventures))) +;;; ENDPONT HELPERS -(defrender t ((page tavern-adventures)) - (with-page (:title "Your Adventures") - (:h1 "You are seer on the following adventures") - (render :list (your-adventures page)))) +;;; ENDPOINT DEFINTIONS (defendpoint* :get "/tavern" () () (with-session (me) @@ -37,12 +36,5 @@ -(defendpoint* :get "/quest/:quest a-quest-with-id:/:name:" () () - (with-session (player) - (render (page-render-mode) - (make-instance 'quest-page - :player player - :hero quest)))) - |