anchor.diff:            ;; Turn into HTML
             (htmlizer config)
   
  -          #'entitle
  +          #'(lambda (d)
  +              (if (eql (config :title config) :auto) (entitle d) d))
  +
             (twitter-widget has-tweets))
            doc)))))
   
  
positive.code: (defun format-dateline (tree)
    (destructuring-bind (&key year (month 0) day) (parse-iso-8601 (just-text tree))
      `((:div :class "dateline") ,(format nil "~d ~a ~d" day (elt *months* month) year))))
  
negative.code:                    (cons `(,k ,@v) acc))))))
      (nreverse (reduce #'combine a2 :initial-value a1))))
  
  (defun default-output-config (filename)
    (if (file-exists-p "./web/")
        (make-pathname :directory (list :relative "web" (pathname-name filename)) :name "index")
        filename))
  
  ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ;; Link rewriting
  