anchor.diff:  (defun stop-recording (res client)
     (declare (ignore res))
     (logit "Request to stop recording received.")
  -  #+nil(delete-session-value 'scene-id (client-session client)))
  +  (delete-session-value 'scene-id (client-session client)))
   
   ;;;
   ;;; Init/teardown
  
positive.code:                 (jsown:to-json msg)))
  
  (defun send-action (recipient actor action-txt)
    (send-msg recipient `("action" (:obj
                                    ("actor" . ,(character-name (find-character-by-id actor)))
                                    ("action" . ,action-txt)))))
  
  (defun send-dialogue (recipient actor dialogue &optional parenthetical)
    (send-msg recipient `("dialogue" (:obj
                                      ("actor" . ,(character-name (find-character-by-id actor)))
                                      ("parenthetical" . ,parenthetical)
                                      ("dialogue" . ,dialogue)))))
  
  (defun local-actors (actor-id)
    (declare (ignore actor-id))
  
negative.code:       (process-client-message res client message)
        (process-client-validation res client message)))
  
  (defgeneric actor-client (actor)
    (:method ((actor-id string))
      (maphash-values (lambda (client)
  