From 7225955e3f8bc10c3c40329e957d62813f2f6b03 Mon Sep 17 00:00:00 2001
From: Robby Findler <robby@racket-lang.org>
Date: Mon, 31 Jul 2006 19:16:42 +0000
Subject: [PATCH] fixed doc bug

svn: r3911
---
 collects/drscheme/private/tool-contracts.ss | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/collects/drscheme/private/tool-contracts.ss b/collects/drscheme/private/tool-contracts.ss
index 84edacb13a..26208b3977 100644
--- a/collects/drscheme/private/tool-contracts.ss
+++ b/collects/drscheme/private/tool-contracts.ss
@@ -970,7 +970,8 @@
            (-> any/c (is-a?/c snip%)))
           ((-> any/c))
           void?)
-   (test-value convert-value (setup-thunk void))
+   ((test-value convert-value)
+    ((setup-thunk void)))
    "Registers a handler to convert values into snips as they are printed in the REPL."
    ""
    "The \\var{test-snip} argument is called to determine if this handler can convert the value "