src/pages/quest-page.lisp


1
2
3
4
5
6
7
8
9
10
11

;;;; quest-page.lisp

(in-package :dnd)

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

(defrender t ((page quest))
  (with-page (:title (unique-name (quest page )))
    (:h1 (unique-name (quest page)))))