[hunchentoot-devel] Garbage in REPL

[Andrey Moskvitin]

Hi,

For ACCESS-LOG-DESIGNATION default value is *ERROR-OUTPUT*. It is the cause of
littering REPL for SLIME users. Maybe better use NIL as default and for suppress
logging use a keyword :suppress?

(defmethod acceptor-access-log-destination ((acceptor acceptor))
  (let ((destination (slot-value acceptor 'access-log-destination)))
    (case destination
      ((nil) *error-output*)
      (:suppress nil)
      (otherwise destination))))

In this case,  the logging will be sent to *inferior-lisp* and  will not
interfere with.

Andrey