 
 
 (defmethod canonize clojure.lang.IPersistentMap
-  [m]
-  (canonize-map m))
+  [value]
+  (canonize-map value))
 
 
 (defmethod canonize clojure.lang.IRecord
-  [record]
-  (illegal-when-strict record)
+  [value]
+  (illegal-when-strict value)
   [:span
    (color-doc :delimiter "#")
-   (.getName (class record))
-   (canonize-map record)])
+   (.getName (class value))
+   (canonize-map value)])
 
 
 (prefer-method canonize clojure.lang.IRecord clojure.lang.IPersistentMap)

             (coll? v) :line
             :else " ")
           (canonize v)])
        entries (->> (seq m)
                     (sort-by first order/rank)
                     (map canonize-kv))]
    [:group



(defn- canonize-map
  [value]
  (let [canonize-kv
        (fn [[k v]]
          [:span
