Remove extra keyword argument.

This commit is contained in:
Vincent St-Amour 2011-06-23 17:30:16 -04:00
parent 8d680ced89
commit 65e56ab387

View File

@ -205,7 +205,6 @@
(define (with-tr-logging-to-port port thunk) (define (with-tr-logging-to-port port thunk)
(with-intercepted-tr-logging (with-intercepted-tr-logging
#:level 'warning
(lambda (l) (lambda (l)
(displayln (vector-ref l 1) port)) ; print log message (displayln (vector-ref l 1) port)) ; print log message
thunk)) thunk))