From 22ce241d4d906454cb983f6add7fa3cad44dafae Mon Sep 17 00:00:00 2001
From: Robby Findler <robby@racket-lang.org>
Date: Thu, 21 Oct 2010 16:19:50 -0500
Subject: [PATCH] no #%plain-app because test is not a function...

---
 collects/lang/htdp-langs.rkt | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/collects/lang/htdp-langs.rkt b/collects/lang/htdp-langs.rkt
index 171e506863..5e2d4265ef 100644
--- a/collects/lang/htdp-langs.rkt
+++ b/collects/lang/htdp-langs.rkt
@@ -567,7 +567,7 @@
                      (cond
                        [(eof-object? ans)
                         (set! done? #t)
-                        #`(#%plain-app test)]
+                        #`(test)]
                        [else
                         ans]))]))))