X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=catagits%2FCatalyst-Runtime.git;a=blobdiff_plain;f=t%2Faggregate%2Flive_engine_request_uploads.t;h=5eb2f8ccae27640c314eaeb0aec46b3f49a1128a;hp=5ba8f1858cc238bc9bf0969b82f012acf6b162b6;hb=88e5a8b0c4d28e46b8ba6b6b9567063e57af9063;hpb=9868e0a0023cc8b598d60f150ea367e0056a65f3 diff --git a/t/aggregate/live_engine_request_uploads.t b/t/aggregate/live_engine_request_uploads.t index 5ba8f18..5eb2f8c 100644 --- a/t/aggregate/live_engine_request_uploads.t +++ b/t/aggregate/live_engine_request_uploads.t @@ -158,7 +158,7 @@ use Path::Class::Dir; ok( $response->is_success, 'Response Successful 2xx' ); is( $response->content_type, 'text/plain', 'Response Content-Type' ); is( $response->content, ( $request->parts )[0]->content, 'Content' ); - + # XXX: no way to test that temporary file for this test was deleted } @@ -214,7 +214,7 @@ use Path::Class::Dir; 'Unserialize Catalyst::Request' ); } - + for my $file ( $creq->upload ) { my $upload = $creq->upload($file); SKIP: @@ -284,7 +284,7 @@ use Path::Class::Dir; is( $upload->size, length( $part->content ), 'Upload Content-Length' ); is( $upload->filename, 'catalyst_130pix.gif', 'Upload Filename' ); is( $upload->basename, 'catalyst_130pix.gif', 'Upload basename' ); - + SKIP: { if ( $ENV{CATALYST_SERVER} ) { @@ -336,7 +336,7 @@ use Path::Class::Dir; # JNAP, I added the following line in order to properly let # the $env go out of scope so that the associated tempfile # would be deleted. I think somewhere Catalyst::Test closed - # over ENV and holds state until a new command is issues but + # over ENV and holds state until a new command is issues but # I can't find it. request GET 'http://localhost/'; @@ -350,7 +350,7 @@ SKIP: if ( $ENV{CATALYST_SERVER} ) { skip 'Not testing uploadtmp on remote server', 14; } - + my $creq; my $dir = "$FindBin::Bin/";