anchor.diff:  		      (concatenate 'string "/" (symbol-name name)))
   	      :function ',name)))
   
  +;; publish index to /
  +(publish :path "/" :function 'index)
  +
   ;;; web pages beyond here
  +(publish-page index
  +  (:standard-page
  +   (:title "")
  +   (:body
  +    (:indexbuttons)
  +    (:indextable *threads-query*)
  +    (echo *fake-copyright*))))
  +
   (publish-page login
     (:standard-page
      (:title "Login")
  
positive.code: 		   :value "Main Page"
  		   :onclick "window.location='../'")))))
  
  (publish-page index
    (:standard-page
     (:title "")
     (:body
      (:indexbuttons)
      (:indextable *threads-query*)
      (echo *fake-copyright*))))
  
  ;; publish index to /
  (publish :path "/" :function 'index)
  
  (publish-page unicode-test
    (:standard-page
     (:title "Unicode Test")
  
negative.code: ;;; The basic format that every viewable page will follow.
  (define-html-macro :standard-page ((&key title) &body body)
    `(:html
       (:head (:title ,(concatenate 'string
  				  title (if (equal title "")
  					    ""
  					    " - ")
  				  *site-name*))
  	    ,@*head*)
       (:body
        (:div :class "container"
  	    ,@*header*
  	    (:h2 ,title)
  	    ,@body))))
  
  ;;; this function creates and publishes page <name> at https://your-site.com/<name>
  (defmacro publish-page (name &body body)
  