;;;; serialization.lisp



(in-package :dungeons-and-deadlines)

(defun hall-of-fame-hero-view (hero)
  (json:to-json
   (list :name (hero-name hero)
         :uid (uid hero)
         :renown (renown hero)
         :title (hero-title hero)
         :class (hero-class hero))))