     arr))
 
 (defn header-map-template [value]
-  (let [arr (template "span" "" "{")
+  (let [arr (template "span" "color:#000" "{")
         v (seq value)]
     (doseq [[k v] (take MAX_MAP_ELEMENTS v)]
       (.push arr


; TODO: convert to idiomatic clojure code
(defn header-collection-template [value]
  (let [arr (template "span" "" "[")]
    (doseq [x (take MAX_COLLECTION_ELEMENTS value)]
      (.push arr (inlined-value-template x) (spacer x)))
    (.pop arr)

    arr))

(defn header-set-template [value]
  (let [arr (template "span" "color:#000" "#{")]
    (doseq [x (take MAX_SET_ELEMENTS value)]
      (.push arr (inlined-value-template x) (spacer x)))
    (.pop arr)
