From 187fce76197031dba1112bd6023b41166f039f3e Mon Sep 17 00:00:00 2001
From: colin <colin@cicadas.surf>
Date: Mon, 6 Mar 2023 19:44:53 -0800
Subject: Add: adventure creation

---
 src/views/player.lisp | 10 ++++++++++
 1 file changed, 10 insertions(+)

(limited to 'src/views/player.lisp')

diff --git a/src/views/player.lisp b/src/views/player.lisp
index 087848e..5a3d074 100644
--- a/src/views/player.lisp
+++ b/src/views/player.lisp
@@ -6,3 +6,13 @@
   (with-html
     (:div :class "player details"
           (:h3 "Welcome " (nickname player)))))
+
+(defrender :option ((player player))
+  (with-html
+    (:option :value (uid player) (nickname player))))
+
+
+(defrender :checkbox ((player player))
+  (with-html
+    (:input :type "checkbox" :id (uid player) :name "POSSIBLE-SEER" :value (uid player))
+    (:label :for (uid player) (nickname player))))
-- 
cgit v1.2.3