X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2Flive_engine_request_uploads.t;h=bab8501e8511559bda601b0090305a92480619e7;hb=f04fdedae056296d0fa97fbdcaa85b9811ca6a5b;hp=3bf9fe9df69478f28052c35002c272dfc9a55ef9;hpb=3c40261066f0ade558228d68c7f59cb329d6b0fb;p=catagits%2FCatalyst-Runtime.git diff --git a/t/live_engine_request_uploads.t b/t/live_engine_request_uploads.t index 3bf9fe9..bab8501 100644 --- a/t/live_engine_request_uploads.t +++ b/t/live_engine_request_uploads.t @@ -14,6 +14,7 @@ use Catalyst::Request::Upload; use HTTP::Headers; use HTTP::Headers::Util 'split_header_words'; use HTTP::Request::Common; +use Path::Class::Dir; { my $creq; @@ -71,7 +72,13 @@ use HTTP::Request::Common; is( $creq->{parameters}->{ $upload->filename }, $upload->filename, 'legacy param method ok' ); - ok( !-e $upload->tempname, 'Upload temp file was deleted' ); + SKIP: + { + if ( $ENV{CATALYST_SERVER} ) { + skip 'Not testing for deleted file on remote server', 1; + } + ok( !-e $upload->tempname, 'Upload temp file was deleted' ); + } } } @@ -127,7 +134,13 @@ use HTTP::Request::Common; is( $upload->filename, $parameters{filename}, 'Upload filename' ); is( $upload->size, length( $part->content ), 'Upload Content-Length' ); - ok( !-e $upload->tempname, 'Upload temp file was deleted' ); + SKIP: + { + if ( $ENV{CATALYST_SERVER} ) { + skip 'Not testing for deleted file on remote server', 1; + } + ok( !-e $upload->tempname, 'Upload temp file was deleted' ); + } } } @@ -244,12 +257,17 @@ use HTTP::Request::Common; } # test uploadtmp config var - +SKIP: { + if ( $ENV{CATALYST_SERVER} ) { + skip 'Not testing uploadtmp on remote server', 13; + } + my $creq; my $dir = "$FindBin::Bin/"; local TestApp->config->{ uploadtmp } = $dir; + $dir = Path::Class::Dir->new( $dir ); my $request = POST( 'http://localhost/dump/request/',