From db116cd14b7c9cd8cd2036daff9c7774096daa56 Mon Sep 17 00:00:00 2001
From: Robby Findler <robby@racket-lang.org>
Date: Sun, 12 Dec 2010 16:24:18 -0600
Subject: [PATCH] don't go up past the collection with relative requires

---
 collects/2htdp/tests/test-image.rkt | 9 ++++-----
 1 file changed, 4 insertions(+), 5 deletions(-)

diff --git a/collects/2htdp/tests/test-image.rkt b/collects/2htdp/tests/test-image.rkt
index f5d8123546..060f9799c1 100644
--- a/collects/2htdp/tests/test-image.rkt
+++ b/collects/2htdp/tests/test-image.rkt
@@ -17,8 +17,8 @@
 (send f show #t)
 |#
 
-(require "../image.ss"
-         (only-in "../../mrlib/image-core.ss" 
+(require 2htdp/image
+         (only-in mrlib/image-core 
                   image%
                   make-image
                   image-shape
@@ -39,11 +39,10 @@
                   to-img
                   render-normalized
                   render-image)
-         (only-in "../private/image-more.ss" 
+         (only-in "../private/image-more.rkt"
                   bring-between
                   swizzle)
-         ; "../private/img-err.ss"
-         "../../mrlib/private/image-core-bitmap.ss"
+         mrlib/private/image-core-bitmap
          lang/posn
          racket/math
          racket/class