anchor.diff:  		  ,link-title)
   	     `(:a :href (page-url ',page-name ',module)
   		  ,link-title))))))
  -		    
  +
   
   ;; helper-snippet to link to a stylesheet file
   ;; Creates a stylesheet-html-tag to a stylesheet defined with the given name.
  
positive.code:     `(let ((*+module+* (make-instance 'module :name ',name :url ,base-url)))
         ,@body)))
  
        
  (defmacro defpage (name (&rest args) &body body)
    "Macro to define a page.
    Creates & registers the appropriate handlers for hunchentoot.
  
negative.code: 			      :name ',name
  			      :handler (lambda()
  					 (with-css-output
  					     ,@body))))))))
  
  
  (defmacro defsnippet (name args &body body)
  