multi method for rendering an object to html

noname.clj

(defmulti htmlify class)

(defmethod htmlify java.util.Map [value]
  (html
   [:dl
    (map #(html [:dt (first %)]
                [:dd (htmlify (last %))]) value)]))

(defmethod htmlify java.util.List [value]
  (html
   [:ul
    (map #(html [:li (htmlify %)]) value)]))

(defmethod htmlify java.lang.Object [value]
  (html
   [:pre
    (str value)]))

(defmethod htmlify nil [_]
  (html
   [:em "nil"]))