anchor.diff:  
   ;;; Pensieve
   
  -(setf (website-heading "pensieve") "Daniel's Pensieve")
  -
   (defun make-pensieve-page ()
     (make-instance 'on-demand-selector
                    :lookup-function (lambda (selector tokens)
  
positive.code: 
  ;;; Home
  
  (setf (website-heading "home") *website-name*)
  
  (defun make-home-page ()
    (make-widget
     (f_% (with-html
  
negative.code:     (:div :class "footer"
        (:div :class "impressum"
          (:a :href "/impressum" "Impressum")))))
  
  ;;; Starting point
  
  