anchor.diff:  (defvar *session-db* nil
     "The default \(global) session database.")
   
  -(defparameter *session-max-time* #.(* 30 60)
  +(defvar *session-max-time* #.(* 30 60)
     "The default time \(in seconds) after which a session times out.")
   
  -(defparameter *session-gc-frequency* 50
  +(defvar *session-gc-frequency* 50
     "A session GC \(see function SESSION-GC) will happen every
   *SESSION-GC-FREQUENCY* requests \(counting only requests which create
   a new session) if this variable is not NIL.  See SESSION-CREATED.")
   
  -(defparameter *use-user-agent-for-sessions* t
  +(defvar *use-user-agent-for-sessions* t
     "Whether the 'User-Agent' header should be encoded into the session
   string.  If this value is true, a session will cease to be accessible
   if the client sends a different 'User-Agent' header.")
   
  -(defparameter *use-remote-addr-for-sessions* nil
  +(defvar *use-remote-addr-for-sessions* nil
     "Whether the client's remote IP \(as returned by REAL-REMOTE-ADDR)
   should be encoded into the session string.  If this value is true, a
   session will cease to be accessible if the client's remote IP changes.
  
positive.code: This might for example be an issue if the client uses a proxy server
  which doesn't send correct 'X_FORWARDED_FOR' headers.")
  
  (defparameter *default-content-type* "text/html"
    "The default content-type header which is returned to the client.
  If this is text content type, the character set used for encoding the
  response will automatically be added to the content type in a
  ``charset'' attribute.")
  
  (defparameter *methods-for-post-parameters* '(:post)
    "A list of the request method types \(as keywords) for which
  Hunchentoot will try to compute POST-PARAMETERS.")
  
  (defparameter *header-stream* nil
    "If this variable is not NIL, it should be bound to a stream to
  which incoming and outgoing headers will be written for debugging
  purposes.")
  
  (defparameter *show-lisp-errors-p* nil
    "Whether Lisp errors in request handlers should be shown in HTML output.")
  
  (defparameter *show-lisp-backtraces-p* t
    "Whether Lisp errors shown in HTML output should contain backtrace information.")
  
  (defparameter *log-lisp-errors-p* t
    "Whether Lisp errors in request handlers should be logged.")
  
  (defparameter *log-lisp-backtraces-p* t
    "Whether Lisp backtraces should be logged.  Only has an effect if
  *LOG-LISP-ERRORS-P* is true as well.")
  
  (defparameter *log-lisp-warnings-p* t
    "Whether Lisp warnings in request handlers should be logged.")
  
  (defparameter *lisp-errors-log-level* :error
    "Log level for Lisp errors.  Should be one of :ERROR \(the default),
  :WARNING, or :INFO.")
  
  (defparameter *lisp-warnings-log-level* :warning
    "Log level for Lisp warnings.  Should be one of :ERROR, :WARNING
  \(the default), or :INFO.")
  
  
negative.code:   "A FLEXI-STREAMS external format used internally for logging and to
  encode cookie values.")
  
  (defvar *hunchentoot-default-external-format* +utf-8+
    "The external format used to compute the REQUEST object.")
  
  (defconstant +buffer-length+ 8192
    "Length of buffers used for internal purposes.")
  
  (defvar *default-connection-timeout* 20
    "The default connection timeout used when an acceptor is reading
  from and writing to a socket stream.")
  
  