From eea0da373349349b4d25dd4bc116a9c9eb04fb98 Mon Sep 17 00:00:00 2001
From: colin <colin@cicadas.surf>
Date: Mon, 6 Mar 2023 20:06:19 -0800
Subject: Add: basic page stub to view an adventure

---
 src/pages/adventure-page.lisp | 8 ++++++++
 1 file changed, 8 insertions(+)
 create mode 100644 src/pages/adventure-page.lisp

(limited to 'src/pages/adventure-page.lisp')

diff --git a/src/pages/adventure-page.lisp b/src/pages/adventure-page.lisp
new file mode 100644
index 0000000..fd9cb09
--- /dev/null
+++ b/src/pages/adventure-page.lisp
@@ -0,0 +1,8 @@
+;;;; adventure-page.lisp -- shows a particular adventure
+
+(in-package :dnd)
+
+(defrender :page ((adventure adventure))
+  (with-page (:title (title adventure))
+    (:h1 (title adventure))
+    (:p "uhh......")))
-- 
cgit v1.2.3