anchor.diff:  	    (name)
   	    "No template named ~S found." name)
       (unless (gethash file-name *tal-templates*)
  -      (setf (gethash file-name *tal-templates*) (make-tal-template :last-load-time 0
  -								   :function nil
  -								   :file-name file-name)))
  +      (setf (gethash file-name *tal-templates*)
  +	    (make-tal-template :last-load-time 0
  +			       :function nil
  +			       :file-name file-name)))
       (lambda (environment generator)
         (let ((template (gethash file-name *tal-templates*))
   	    (file-write-date (file-write-date file-name)))
  -        (when (or (not (cachep generator))
  -                  (< (tal-template.last-load-time template) file-write-date))
  -          (setf
  -           (tal-template.function template) (compile nil (preprocess-tal generator file-name))
  -           (tal-template.last-load-time template) file-write-date))
  +	(when (or (not (cachep generator))
  +		  (< (tal-template.last-load-time template) file-write-date))
  +	  (setf
  +	   (tal-template.function template)
  +	   (compile nil (preprocess-tal generator file-name))
  +
  +	   (tal-template.last-load-time template) file-write-date))
   	(funcall (tal-template.function template) environment generator)))))
   
   (defmethod preprocess-tal ((generator file-system-generator) (file-name string))
  
positive.code: (defmethod template-truename ((generator file-system-generator) (name pathname))
    (dolist (root (root-directories generator))
      (when-bind truename (probe-file (merge-pathnames name root))
         (return-from template-truename truename)))
    (return-from template-truename nil))
  
  (defmethod load-tal ((generator file-system-generator) (name string))
  
negative.code: ;;  - Neither the name of Edward Marco Baringer, nor BESE, nor the names
  ;;    of its contributors may be used to endorse or promote products
  ;;    derived from this software without specific prior written permission.
  ;;
  ;; THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
  ;; "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
  ;; LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR
  