From ab5a9ff1e82611a0ba9e0a45d341842b7209adef Mon Sep 17 00:00:00 2001 From: Jay McCarthy Date: Thu, 16 Sep 2010 12:30:30 -0600 Subject: [PATCH] Removing extra run-tests --- collects/tests/web-server/dispatch-test.rkt | 5 ----- .../tests/web-server/dispatchers/dispatch-files-test.rkt | 3 --- collects/tests/web-server/dispatchers/dispatch-lang-test.rkt | 5 ----- collects/tests/web-server/formlets-test.rkt | 3 --- collects/tests/web-server/http/cookies-test.rkt | 3 --- collects/tests/web-server/lang/abort-resume-test.rkt | 5 ----- collects/tests/web-server/private/cache-table-test.rkt | 5 ----- collects/tests/web-server/servlet/helpers-test.rkt | 3 --- collects/tests/web-server/stuffers-test.rkt | 5 ----- 9 files changed, 37 deletions(-) diff --git a/collects/tests/web-server/dispatch-test.rkt b/collects/tests/web-server/dispatch-test.rkt index 0a8c1cfc59..1bd4189869 100644 --- a/collects/tests/web-server/dispatch-test.rkt +++ b/collects/tests/web-server/dispatch-test.rkt @@ -455,8 +455,3 @@ (h1 ,(number->string (+ fst snd))))) (serve/dispatch start)) - -#;(test-serve/dispatch) - -(require rackunit/text-ui) -(run-tests all-dispatch-tests) diff --git a/collects/tests/web-server/dispatchers/dispatch-files-test.rkt b/collects/tests/web-server/dispatchers/dispatch-files-test.rkt index 4b4569c220..fc626b0e12 100644 --- a/collects/tests/web-server/dispatchers/dispatch-files-test.rkt +++ b/collects/tests/web-server/dispatchers/dispatch-files-test.rkt @@ -119,6 +119,3 @@ (test-exn "dir, not exists, head" exn:dispatcher? (lambda () (collect (dispatch #f a-dir) (req #t #"HEAD" empty)))))) - -#;(require (planet schematics/rackunit:3/text-ui)) -#;(run-tests dispatch-files-tests) diff --git a/collects/tests/web-server/dispatchers/dispatch-lang-test.rkt b/collects/tests/web-server/dispatchers/dispatch-lang-test.rkt index 3cca138426..802a10af92 100644 --- a/collects/tests/web-server/dispatchers/dispatch-lang-test.rkt +++ b/collects/tests/web-server/dispatchers/dispatch-lang-test.rkt @@ -162,8 +162,3 @@ ; XXX test web-extras.rkt - redirect/get )) - -#| -(require rackunit/text-ui) -(run-tests dispatch-lang-tests) -|# diff --git a/collects/tests/web-server/formlets-test.rkt b/collects/tests/web-server/formlets-test.rkt index c96d069032..ab5ad60ccc 100644 --- a/collects/tests/web-server/formlets-test.rkt +++ b/collects/tests/web-server/formlets-test.rkt @@ -624,6 +624,3 @@ (values "Jay" 10 6 10 8))))) )) - -(require rackunit/text-ui) -(run-tests all-formlets-tests) diff --git a/collects/tests/web-server/http/cookies-test.rkt b/collects/tests/web-server/http/cookies-test.rkt index 5eeadfc964..902cb3d2eb 100644 --- a/collects/tests/web-server/http/cookies-test.rkt +++ b/collects/tests/web-server/http/cookies-test.rkt @@ -158,6 +158,3 @@ __utmz=165257760.1272597702.1.1.utmcsr=(direct)|utmccn=(direct)|utmcmd=(none)\r\ ))) - -(require rackunit/text-ui) -(run-tests cookies-tests) diff --git a/collects/tests/web-server/lang/abort-resume-test.rkt b/collects/tests/web-server/lang/abort-resume-test.rkt index 900190119e..6cd95a7497 100644 --- a/collects/tests/web-server/lang/abort-resume-test.rkt +++ b/collects/tests/web-server/lang/abort-resume-test.rkt @@ -304,8 +304,3 @@ ; XXX test dispatch )) - -#| -(require rackunit/text-ui) -(run-tests abort-resume-tests) -|# diff --git a/collects/tests/web-server/private/cache-table-test.rkt b/collects/tests/web-server/private/cache-table-test.rkt index afe1835b3a..5c50cdf179 100644 --- a/collects/tests/web-server/private/cache-table-test.rkt +++ b/collects/tests/web-server/private/cache-table-test.rkt @@ -35,8 +35,3 @@ (cache-table-lookup! ct 'foo (lambda () #t)) (cache-table-clear! ct) (cache-table-lookup! ct 'foo (lambda () #f))))))) - -#| -(require (planet schematics/rackunit:3/text-ui)) -(run-tests cache-table-tests) -|# diff --git a/collects/tests/web-server/servlet/helpers-test.rkt b/collects/tests/web-server/servlet/helpers-test.rkt index 56718f57f6..8c296fdbd2 100644 --- a/collects/tests/web-server/servlet/helpers-test.rkt +++ b/collects/tests/web-server/servlet/helpers-test.rkt @@ -52,6 +52,3 @@ (test-case "permanently" (check-true (redirection-status? permanently))) (test-case "temporarily" (check-true (redirection-status? temporarily))) (test-case "see-other" (check-true (redirection-status? see-other)))))) - -;(require (planet schematics/rackunit:3/text-ui)) -;(run-tests helpers-tests) diff --git a/collects/tests/web-server/stuffers-test.rkt b/collects/tests/web-server/stuffers-test.rkt index 5c93e4fa2b..066ae55db4 100644 --- a/collects/tests/web-server/stuffers-test.rkt +++ b/collects/tests/web-server/stuffers-test.rkt @@ -125,8 +125,3 @@ (context-wrap (lambda () (check-not-false (is-url-too-big? (make-bytes 3000 65))))))))) - -#| -(require (planet schematics/rackunit:3/text-ui)) -(run-tests all-stuffers-tests) -|#