From 83085478b3682885a4aa24cebde3e295b168c64f Mon Sep 17 00:00:00 2001 From: Tony Garnock-Jones Date: Thu, 11 Apr 2013 15:18:57 -0400 Subject: [PATCH] Racket's logging now emits *four* values --- marketplace/log-untyped.rkt | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/marketplace/log-untyped.rkt b/marketplace/log-untyped.rkt index 610beb9..b89fd5c 100644 --- a/marketplace/log-untyped.rkt +++ b/marketplace/log-untyped.rkt @@ -34,6 +34,6 @@ (lambda () (let loop () (match (sync receiver) - [(vector level message data) + [(vector level message data event-name) (fprintf (current-error-port) "~a/~a\n" (level-code level) message)]) (loop)))))])