summaryrefslogtreecommitdiff
path: root/src/pages/tavern.lisp
diff options
context:
space:
mode:
Diffstat (limited to 'src/pages/tavern.lisp')
-rw-r--r--src/pages/tavern.lisp30
1 files changed, 0 insertions, 30 deletions
diff --git a/src/pages/tavern.lisp b/src/pages/tavern.lisp
deleted file mode 100644
index 2fb7498..0000000
--- a/src/pages/tavern.lisp
+++ /dev/null
@@ -1,30 +0,0 @@
-;;;; pages/tavern.lisp -- enter the tavern
-
-(in-package :dnd)
-
-(defclass/std tavern ()
- ((player)))
-
-(defrender t ((tavern tavern))
- (with-page (:title "A Bustling Tavern")
- (let ((player (player tavern)))
- (render :details player)
- (when (player-heroes player)
- (:h2 "Your Heroes:")
- (render :list (player-heroes player)))
- (:a :href "tavern/adventures" "Adventures for which you are seer.")
- (:br)
- (:a :href "/goddess-shrine" "Pray a new hero rises.")
- (:br)
- (:a :href "/spymaster" "Report a Roguish Rumour...")
- (:br)
- (:a :href "/adventure-awaits" "Embark on a new Adventure!"))))
-
-
-(defclass/std tavern-adventures ()
- ((your-adventures)))
-
-(defrender t ((page tavern-adventures))
- (with-page (:title "Your Adventures")
- (:h1 "You are seer on the following adventures")
- (render :list (your-adventures page))))