anchor.diff:                       template-parameters
                        ((:template-directory *template-directory*)
                         *template-directory*)
  -		     ((:depends-on *depends-on*) *depends-on*)
  +                     ((:depends-on *depends-on*) *depends-on*)
                        ((:author *author*) *author*)
                        ((:license *license*) *license*)
                        (name (pathname-project-name pathname) name-provided-p)
  
positive.code:              (let* ((relative-namestring
                       (enough-namestring pathname template-directory))
                      (target-pathname (template-pathname->output-name
  				      (merge-pathnames relative-namestring
  						       target-directory))))
                 (ensure-directories-exist target-pathname)
                 (with-open-file (stream
                                  target-pathname
  
negative.code:   (list :name *name*
          :license *license*
          :author *author*
          :depends-on (mapcar
                       (lambda (sym)
                         (list :symbol sym :uninterned (format nil "#:~(~a~)" sym)))
                       *depends-on*)
          :dependencies-string (format nil "(~{#:~(~a~)~^ ~})" *depends-on*)
          :copyright (when *include-copyright*
                       (format nil "Copyright (c) ~D ~A~%" (current-year) *author*))))
  
  (defvar *template-parameter-functions* (list 'default-template-parameters)
    "A list of functions that return plists for use when rewriting
  