anchor.diff:  ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
   
   (eval-when (:compile-toplevel :load-toplevel :execute)
  -  (closure-template:compile-template :common-lisp-backend
  -                                     (merge-pathnames "src/directory-publisher.tmpl"
  -                                                      (asdf:component-pathname (asdf:find-system '#:restas-directory-publisher)))))
  -
  -;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  -;;;; Plugin variables
  +  (closure-template:compile-cl-templates
  +   (merge-pathnames "src/directory-publisher.tmpl"
  +                    (asdf:system-source-directory '#:restas-directory-publisher))))
  +
  +
  +;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  +;;;; module params
   ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
   
   (defvar *directory* nil)
  
positive.code:            #:*directory*
             #:*directory-index-files*
             #:*autoindex*
             #:*autoindex-template*
             #:*enable-cgi-by-type*
             #:*ignore-pathname-p*
             #:default-pathname-info
             #:*pathname-info*
             #:hidden-pathname-p))
  
  (in-package #:restas.directory-publisher)
  
  
negative.code: (defvar *directory-index-files* '("index.html" "index.htm"))
  
  (defvar *autoindex* t)
  
  (defvar *enable-cgi-by-type* nil)
  
  