X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2Fcatalyst-request-rest.t;h=2226793dad96cf9da0ed5ad60286be8e9db3ae06;hb=9ce644ee77b509559b39a8bc870e00a819ac6792;hp=92ae166b8a9e979fd061611367823912d9e2668a;hpb=5132f5e4eeafa3a5958c3cba8d76e61b1ff7740f;p=catagits%2FCatalyst-Action-REST.git

diff --git a/t/catalyst-request-rest.t b/t/catalyst-request-rest.t
index 92ae166..2226793 100644
--- a/t/catalyst-request-rest.t
+++ b/t/catalyst-request-rest.t
@@ -168,13 +168,15 @@ use HTTP::Headers;
 }
 
 {
+  local %ENV=%ENV;
+  $ENV{CATALYST_DEBUG} = 0;
   my $test = 'Test::Catalyst::Action::REST';
   use_ok $test;
   is($test->request_class, 'Catalyst::Request::REST',
     'Request::REST took over for Request');
 
   $test->request_class('Some::Other::Class');
-  eval { $test->setup };
+  eval { $test->setup_finished(0); $test->setup };
   like $@, qr/$test has a custom request class Some::Other::Class/;
 
   {
@@ -182,7 +184,7 @@ use HTTP::Headers;
     use base 'Catalyst::Request::REST';
   }
   $test->request_class('My::Request');
-  eval { $test->setup };
+  eval { $test->setup_finished(0); $test->setup };
   is $@, '', 'no error from Request::REST subclass';
 }