 (def span "span")
 (def ol "ol")
 (def li "li")
+(def general-cljs-land-style "background-color:#efe")
 
 (declare inlined-value-template)
 

    (seq? value) (header-seq-template value)
    (coll? value) (header-coll-template value)))

(defn inlined-value-template [value]
  (or (atomic-template value)
      (js-object-template value)
      (generic-template value)))

(defn header-template [value]
  (or (atomic-template value)

      (pr-str value)))

(defn build-header [value]
  (wrap-cljs-land-if-needed true (header-template value)))

(defn standard-body-template [lines]
  (template ol standard-ol-style (map #(template li standard-li-style %) lines)))
