diff --git a/collects/web-server/prototype-web-server/tests/persistent-interaction-tests.ss b/collects/web-server/prototype-web-server/tests/lang-tests.ss similarity index 99% rename from collects/web-server/prototype-web-server/tests/persistent-interaction-tests.ss rename to collects/web-server/prototype-web-server/tests/lang-tests.ss index 53589e5e81..3a38bde616 100644 --- a/collects/web-server/prototype-web-server/tests/persistent-interaction-tests.ss +++ b/collects/web-server/prototype-web-server/tests/lang-tests.ss @@ -1,7 +1,7 @@ -(module persistent-interaction-tests mzscheme +(module lang-tests mzscheme (require (planet "test.ss" ("schematics" "schemeunit.plt" 1 1)) "language-tester.ss") - (provide persistent-interaction-suite) + (provide lang-suite) (define (catch-unsafe-context-exn thunk) (with-handlers ([void @@ -14,9 +14,9 @@ (raise the-exn)))]) (and (thunk) #f))) - (define persistent-interaction-suite + (define lang-suite (make-test-suite - "Test the persistent interaction language" + "Test the Web language" ;; **************************************** ;; **************************************** diff --git a/collects/web-server/prototype-web-server/tests/suite.ss b/collects/web-server/prototype-web-server/tests/suite.ss index b240b5eda9..ef14ce2ffa 100644 --- a/collects/web-server/prototype-web-server/tests/suite.ss +++ b/collects/web-server/prototype-web-server/tests/suite.ss @@ -5,7 +5,7 @@ "test-normalizer.ss" "closure-tests.ss" "labels-tests.ss" - "persistent-interaction-tests.ss" + "lang-tests.ss" "stuff-url-tests.ss") (test/graphical-ui @@ -16,5 +16,5 @@ test-normalizer-suite closure-tests-suite labels-tests-suite - persistent-interaction-suite + lang-suite ))) \ No newline at end of file