From d35d05956e8efec92b3a876324a0def44ef8313f Mon Sep 17 00:00:00 2001
From: Matthias Felleisen <matthias@racket-lang.org>
Date: Mon, 19 Jan 2009 02:13:47 +0000
Subject: [PATCH] removed a left-over printf

svn: r13209
---
 collects/htdp/world.ss | 1 -
 1 file changed, 1 deletion(-)

diff --git a/collects/htdp/world.ss b/collects/htdp/world.ss
index 7f48a8ddd3..93f745c977 100644
--- a/collects/htdp/world.ss
+++ b/collects/htdp/world.ss
@@ -471,7 +471,6 @@ Matthew
              (define dir (direction x0 y0 x1 y1))
              (define-values (upp low lft rgt) (intersections lin w h))
              (define (add x y) (add-line img x0 y0 x y c)))
-       (printf "up/low: ~s x ~s ~s\n" upp low dir)
        (cond
          [(and (< 0 x0 w) (< 0 y0 h)) ;; (x0,y0) is in the interior
           (case dir