anchor.diff:            (<:label (<:ah "Confirm password"))
             (<:input :type "password" :name "confirmation")
             (<:br)
  -          (<:input :type "submit" :value "Submit")))
  +          (<:submit :value "Submit")))
   
   (defun render-error-messages (errors)
     (<:ul :class "errorlist"
  
positive.code:           (<:label (<:ah "Password"))
            (<:input :type "password" :name "password")
            (<:br)
            (<:input :type "submit" :value "Submit")))
  
  (define-easy-handler (login :uri "/login") (account-name password)
    (if (and *session* (session-value 'account-name))
  
negative.code:           (<:label (<:ah "Description"))
            (<:input :type "textfield" :name "description")
            (<:br)
            (<:submit :value "Submit")))
  
  (define-easy-handler (newchar :uri "/newchar") (name description)
    (unless (and *session* (session-value 'account-name))
  