From 05873b8c54df85fbc8f1b83743f1b6e74ae640a6 Mon Sep 17 00:00:00 2001 From: Matthew Flatt Date: Sat, 17 Oct 2009 14:50:52 +0000 Subject: [PATCH] clean up some tests svn: r16350 original commit: 110ea411d1ce43a1a813972d861095f7175a728d --- collects/tests/mred/blits.ss | 7 ++++--- 1 file changed, 4 insertions(+), 3 deletions(-) diff --git a/collects/tests/mred/blits.ss b/collects/tests/mred/blits.ss index 24afdc4b..570840af 100644 --- a/collects/tests/mred/blits.ss +++ b/collects/tests/mred/blits.ss @@ -1,3 +1,4 @@ +#lang scheme/gui (define ok-frame (make-object frame% "Ok")) (define ok-panel #f) @@ -57,14 +58,14 @@ (define targets (list - (build-path (collection-path "frtime") "clock.png") - (self-mask (build-path (collection-path "frtime") "clock.png")) + (build-path (collection-path "frtime") "tool" "clock.png") + (self-mask (build-path (collection-path "frtime") "tool" "clock.png")) (build-path (collection-path "icons") "foot-up.png") (build-path (collection-path "icons") "mred.xbm") (self-mask (build-path (collection-path "icons") "mred.xbm")) (plus-mask (build-path (collection-path "icons") "mred.xbm") (build-path (collection-path "icons") "PLT-206.png")) - (plus-mask (build-path (collection-path "frtime") "clock.png") + (plus-mask (build-path (collection-path "frtime") "tool" "clock.png") (build-path (collection-path "icons") "mred.xbm")) (build-path (collection-path "icons") "htdp-icon.gif") ))