anchor.diff:               (:a :href "#" "Forgot?")))))))
   
   (test empty-tags-on-same-line
  -  (let ((*print-pretty* t))
  +  (with-pretty-printing
       (is (visually-equal
            (format nil "~
   <div>
  
positive.code:         (string-join #\Newline))))
  
  (test indent-sanely-in-blocks-in-paragraphs
    (let ((*print-pretty* t))
      (is (serapeum:string*=
           (indent-string
            (with-html-string
  
negative.code:        (lorem-ipsum-string))))
  
  (test hello-hello-hello
    (with-pretty-printing
      (is (visually-equal
           "<div>
   <div>
  