anchor.diff:  (in-package :papaya)
  +
  +(setf cl-who:*attribute-quote-char* #\"
  +      (cl-who:html-mode) :html5)
   
   (load-plugins :use-quicklisp t)
   
  
positive.code: (defun start (&key bind (port 8080))
      (setf *log-level* :notice)
      (setf *error-handler* 'error-handler)
      
      (load-views)
  
  
negative.code:               (as:free-signal-handler 2)
                (as:close-tcp-server server)
                (as:exit-event-loop))))))
  