Added $c->error(0) support

[catagits/Catalyst-Runtime.git] / t / optional / stress.t

diff --git a/t/optional/stress.t b/t/optional/stress.t
index 10ee561..f1f6b45 100644 (file)
--- a/t/optional/stress.t
+++ b/t/optional/stress.t
@@ -10,13 +10,15 @@ use Test::More;
 use Catalyst::Test 'TestApp';\r
 use YAML;\r
 \r
-our ($iters, $tests);\r
-BEGIN { \r
-    plan skip_all => 'set CAT_STRESS to enable this test' unless $ENV{CAT_STRESS};\r
-    \r
-    $iters = $ENV{CAT_STRESS} || 10;\r
-    $tests = YAML::LoadFile( "$FindBin::Bin/stress.yml" );\r
-    \r
+our ( $iters, $tests );\r
+\r
+BEGIN {\r
+    plan skip_all => 'set TEST_STRESS to enable this test'\r
+      unless $ENV{TEST_STRESS};\r
+\r
+    $iters = $ENV{TEST_STRESS} || 10;\r
+    $tests = YAML::LoadFile("$FindBin::Bin/stress.yml");\r
+\r
     my $total_tests = 0;\r
     map { $total_tests += scalar @{ $tests->{$_} } } keys %{$tests};\r
     plan tests => $iters * $total_tests;\r
@@ -29,7 +31,7 @@ for ( 1 .. $iters ) {
 sub run_tests {\r
     foreach my $test_group ( keys %{$tests} ) {\r
         foreach my $test ( @{ $tests->{$test_group} } ) {\r
-            ok( request( $test ), $test_group . ' - ' . $test );\r
+            ok( request($test), $test_group . ' - ' . $test );\r
         }\r
     }\r
 }\r