From fb8e8640bb6251db5d46288f0a3959a2abe3e2f4 Mon Sep 17 00:00:00 2001
From: Jay McCarthy <jay@racket-lang.org>
Date: Thu, 13 May 2010 14:25:39 -0600
Subject: [PATCH] This error should not be on stderr, because it is intended

---
 collects/tests/mred/testing.rktl | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/collects/tests/mred/testing.rktl b/collects/tests/mred/testing.rktl
index 4c951546eb..e08d5fdac0 100644
--- a/collects/tests/mred/testing.rktl
+++ b/collects/tests/mred/testing.rktl
@@ -23,7 +23,7 @@
 	(test 'was-mismatch 'mismtach
 	      (with-handlers ([exn:fail:contract?
 			       (lambda (x)
-				 (fprintf (current-error-port) "~a~n" (exn-message x))
+                                 (printf "~a~n" (exn-message x))
 				 'was-mismatch)]
 			      [exn:fail? values])
 		expr)))])))