edicl/hunchentoot — Issue #3: Different logging defaults
Author: hanshuebner
Created: 2011-10-30 21:23:32+00:00
State: open

Andrey Moskvitin via common-lisp.net to General, Apr 4

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

_______________________________________________
tbnl-devel site list
tbnl-devel@common-lisp.net
http://common-lisp.net/mailman/listinfo/tbnl-devel