src/pages/hero-page.lisp


1
2
3
4
5
6
7
8
9
10
11
12

;;;; hero-apge.lisp -- shows a particular hero

(in-package :dnd)

(defclass hero-page ()
  ((hero :reader hero :initarg :hero)
   (player :reader player :initarg :player)))

(defrender t ((page hero-page))
  (with-page (:title (unique-name (hero page)))
    (:h1 (unique-name (hero page)))
    (:p "uhhh.....")))