From e2a60e8d2b8e41bcd2c9a39d8e2210f701b92353 Mon Sep 17 00:00:00 2001 From: colin Date: Tue, 7 Mar 2023 18:36:45 -0800 Subject: Add: growing an app skeleton --- src/pages/adventure-page.lisp | 10 +++++++--- 1 file changed, 7 insertions(+), 3 deletions(-) (limited to 'src/pages/adventure-page.lisp') diff --git a/src/pages/adventure-page.lisp b/src/pages/adventure-page.lisp index fd9cb09..80361a0 100644 --- a/src/pages/adventure-page.lisp +++ b/src/pages/adventure-page.lisp @@ -2,7 +2,11 @@ (in-package :dnd) -(defrender :page ((adventure adventure)) - (with-page (:title (title adventure)) - (:h1 (title adventure)) +(defclass adventure-page () + ((adventure :reader adventure :initarg :adventure) + (player :reader player :initarg :player))) + +(defrender t ((page adventure-page)) + (with-page (:title (title (adventure page))) + (:h1 (title (adventure page))) (:p "uhh......"))) -- cgit v1.2.3