diff options
Diffstat (limited to 'src/pages/adventure-page.lisp')
| -rw-r--r-- | src/pages/adventure-page.lisp | 9 |
1 files changed, 6 insertions, 3 deletions
diff --git a/src/pages/adventure-page.lisp b/src/pages/adventure-page.lisp index 80361a0..01424a0 100644 --- a/src/pages/adventure-page.lisp +++ b/src/pages/adventure-page.lisp @@ -7,6 +7,9 @@ (player :reader player :initarg :player))) (defrender t ((page adventure-page)) - (with-page (:title (title (adventure page))) - (:h1 (title (adventure page))) - (:p "uhh......"))) + (let ((adventure (adventure page))) + (with-page (:title (title adventure)) + (:h1 (title adventure)) + (:p (description adventure)) + (:h2 "Seers: " (render :list (cons (creator adventure) + (seers adventure))))))) |