X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2Fcatalyst-request-rest.t;h=82687d28b5c8a85b46f53c879fc6912bbe8e130d;hb=7e08f674608981f6e40e74fca18b312bf36ed865;hp=ac49e29cddeb77d43df52ac223390b3f0c9f8bb5;hpb=39857593498efa3df2f8c300500f294458a1f856;p=catagits%2FCatalyst-Action-REST.git diff --git a/t/catalyst-request-rest.t b/t/catalyst-request-rest.t index ac49e29..82687d2 100644 --- a/t/catalyst-request-rest.t +++ b/t/catalyst-request-rest.t @@ -1,6 +1,6 @@ use strict; use warnings; -use Test::More tests => 28; +use Test::More tests => 26; use FindBin; use lib ( "$FindBin::Bin/../lib", "$FindBin::Bin/../t/lib" ); @@ -170,20 +170,8 @@ use HTTP::Headers; { 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_finished(0); $test->setup }; - like $@, qr/$test has a custom request class Some::Other::Class/; - - { - package My::Request; - use base 'Catalyst::Request::REST'; - } - $test->request_class('My::Request'); - eval { $test->setup_finished(0); $test->setup }; - is $@, '', 'no error from Request::REST subclass'; + is($test->request_class, 'Catalyst::Request', + 'Request::REST did not take over for Request'); } package MockContext;