From 4e92d54b28734298e1b553dd44e6e0cf59ebe871 Mon Sep 17 00:00:00 2001 From: Robby Findler Date: Mon, 8 Feb 2010 19:44:01 +0000 Subject: [PATCH] possible fix to module lang test suite svn: r18020 --- collects/tests/drscheme/module-lang-test-utils.ss | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/collects/tests/drscheme/module-lang-test-utils.ss b/collects/tests/drscheme/module-lang-test-utils.ss index 2f34ad34f8..314be3b3b5 100644 --- a/collects/tests/drscheme/module-lang-test-utils.ss +++ b/collects/tests/drscheme/module-lang-test-utils.ss @@ -23,7 +23,7 @@ (define in-here (let ([here (this-expression-source-directory)]) - (lambda (file) (format "~s" (path->string (build-path here file)))))) + (lambda (file) (format "~s" (path->string (build-path (find-system-path 'temp-dir) file)))))) (define tests '()) (define-syntax (test stx)