anchor.diff:  ;; Question: Do even minor instances of HTML need to be templated out?
   
   ;; TODO for today:
  -;; * Logout button
   
   (defvar *server* nil)
   (defparameter *current-story* nil)
  
positive.code:        (<:input :type "textarea" :id "user-action")
         (<:label (<:ah "Dialogue: "))
         (<:input :type "textarea" :id "user-dialogue")
         (<:input :type "submit" :value "Send"))))))
  
  (define-easy-handler (ajax :uri "/ajax") (f)
    (let ((func (find-ajax-func f)))
  
negative.code:   (when *server* (stop *server*) (setf *server* nil)))
  
  (define-easy-handler (login :uri "/login") (username)
    (if (and *session* (session-value 'username))
        (redirect "/")
        (start-session))
    (with-yaclml-output-to-string
      (<:html
       (<:head
  