possible fix to module lang test suite

svn: r18020
2010-02-08 19:44:01 +00:00 · 2010-02-08 19:44:01 +00:00 · 4e92d54b28
commit 4e92d54b28
parent c1373f8214
1 changed files with 1 additions and 1 deletions
--- 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)