anchor.diff:                   :top "12px"))))
              (content (markup:markup
                        (:body (:h1 "History")
  +                            (:style (style output-buffer))
                               (:style (markup:raw tree-style))
                               (:div (markup:raw
                                      (markup:markup*
  
positive.code:                  :content "' '"
                   :position "absolute"
                   :width "1px"
                   :top "5px"
                   :bottom "-12px"
                   :left "-10px")
  
negative.code:                                   (htree:current history))))
             (tree-style
               (cl-css:css
                '((body
                   :line-height "initial")
                  (* :margin 0
                     :padding 0
                     :list-style "none")
                  ("ul li"
  