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
Hi Andrey,
this suggestion did not make it to the release. Actually, I like the current default, but I have converted your suggestion into an issue and will look at it for the next release. Sorry that it took so long to respond at all.
-Hans
On Mon, Apr 4, 2011 at 5:59 PM, Andrey Moskvitin archimag@gmail.com wrote:
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