anchor.diff:  
   ;;; Home
   
  -(setf (website-heading "home") *website-name*)
  -
   (defun make-home-page ()
     (make-widget
      (f_% (with-html
  
positive.code:                          (cons "main" (md "math.md")))))
  
  ;;; Poems
  
  (setf (website-heading "poetry") "Poetry")
  
  (defun make-poems-page ()
    (make-instance 'static-selector
  
negative.code: 
  ;;; Pensieve
  
  (defun make-pensieve-page ()
    (make-instance 'on-demand-selector
                   :lookup-function (lambda (selector tokens)
  