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=5ba8f1858cc238bc9bf0969b82f012acf6b162b6;hp=8906e038b60c577bf8acc8a3b64a7193cade535d;hb=efc1a69b1e03a40bc721aa745846d45f855b9511;hpb=9af4ee013b23e7241d4664ea39952fa3b20f4b7f diff --git a/t/aggregate/live_engine_request_uploads.t b/t/aggregate/live_engine_request_uploads.t index 8906e03..5ba8f18 100644 --- a/t/aggregate/live_engine_request_uploads.t +++ b/t/aggregate/live_engine_request_uploads.t @@ -332,6 +332,14 @@ use Path::Class::Dir; if ( $ENV{CATALYST_SERVER} ) { skip 'Not testing for deleted file on remote server', 1; } + + # 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 + # I can't find it. + + request GET 'http://localhost/'; ok( !-e $body->body->filename, 'Upload temp file was deleted' ); } }