blob: 7387901c7e02b3dd2bb4ea57307a6fec90ebe509 (
plain)
1
2
3
4
5
6
7
8
9
10
11
|
;;;; views/hero.lisp
(in-package :dnd)
(defrender :list-item ((hero hero))
(with-html
(with-slots ((name campaign) hero)
(:p name "the" (hero-class hero) (hero-title hero)
(when campaign
(:span "who is off in the campaign")
(:span (render :inline campaign)))))))
|