;;;; views/player.lisp

(in-package :dnd)

(defrender :details ((player player))
  (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))))