Dynamic require only requires Schemeunit 2

svn: r11007

original commit: 72a2b55c1395bd82132b4334aecb421993a3f99d
This commit is contained in:
Sam Tobin-Hochstadt 2008-07-31 12:44:25 +00:00
parent 6e2786758e
commit 7beae186ec

View File

@ -32,7 +32,7 @@
(define (run . ts)
(test/text-ui (mk-suite ts)))
(define (test/gui suite) ((dynamic-require '(planet schematics/schemeunit/graphical-ui) 'test/graphical-ui) suite))
(define (test/gui suite) ((dynamic-require '(planet schematics/schemeunit:2/graphical-ui) 'test/graphical-ui) suite))
(define (run/gui . ts)
(test/gui (mk-suite ts)))