diff --git a/collects/tests/framework/debug.rkt b/collects/tests/framework/debug.rkt index 9335214488..13ccee16c2 100644 --- a/collects/tests/framework/debug.rkt +++ b/collects/tests/framework/debug.rkt @@ -14,7 +14,7 @@ (define schedule? #t) ;; all of the sexpression transactions between mz and mred -(define messages? #t) +(define messages? #f) (define-syntax (debug-when stx) (syntax-case stx (mr-tcp mz-tcp admin schedule messages)