anchor.diff:  	  *css-file*
   	  (pathname-for-system-file 'tinaa "tinaa.css")
   	  (error "can't find CSS file")))))
  -
  -;;; ---------------------------------------------------------------------------
   
   (defmethod build-documentation :around
              ((writer basic-page-writer) (part doclisp-assembly)
  
positive.code:                         :if-does-not-exist :ignore))
      (ensure-directories-exist *document-root*)
      (call-next-method)))
  
  ;;; ---------------------------------------------------------------------------
  
  (defmethod build-documentation ((writer basic-page-writer) (part doclisp-assembly)
                                  root &key &allow-other-keys)
  
negative.code:            output
             :if-exists if-exists args)))
  
  (defmethod css-file-for-writer ((writer basic-page-writer))
    (or
     (css-file writer)
  