X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2Flib%2FTestApp%2FController%2FEngine%2FResponse%2FLarge.pm;h=75d4ef37c3e01594ec6cc0d1a2e901d8acdab32c;hb=9c74923de2304b8c8f0a7a2faa0854ad9b4d3a92;hp=e9e488c6d3bd9ddea93c8df55cb8848543a830eb;hpb=66741f94ac93b7ba0989db3556d0e3fe36c1be87;p=catagits%2FCatalyst-Runtime.git diff --git a/t/lib/TestApp/Controller/Engine/Response/Large.pm b/t/lib/TestApp/Controller/Engine/Response/Large.pm index e9e488c..75d4ef3 100644 --- a/t/lib/TestApp/Controller/Engine/Response/Large.pm +++ b/t/lib/TestApp/Controller/Engine/Response/Large.pm @@ -1,16 +1,16 @@ -package TestApp::Controller::Engine::Response::Large; - -use strict; -use base 'Catalyst::Base'; - -sub one : Relative { - my ( $self, $c ) = @_; - $c->res->output( 'x' x (100 * 1024) ); -} - -sub two : Relative { - my ( $self, $c ) = @_; - $c->res->output( 'y' x (1024 * 1024) ); -} - -1; +package TestApp::Controller::Engine::Response::Large; + +use strict; +use base 'Catalyst::Controller'; + +sub one : Relative { + my ( $self, $c ) = @_; + $c->res->output( 'x' x (100 * 1024) ); +} + +sub two : Relative { + my ( $self, $c ) = @_; + $c->res->output( 'y' x (1024 * 1024) ); +} + +1;