X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2F04io.t;h=3b730138feb6526172565ca65c8872265923e7a6;hb=9c216915d12ea486f286186438c98593c2a3c60b;hp=029c5a7291bd7d376b6e88b7d25b1feddc702f35;hpb=14f243e8c78199aad82785aa32f2f3e5409d9a9b;p=catagits%2FHTTP-Request-AsCGI.git diff --git a/t/04io.t b/t/04io.t index 029c5a7..3b73013 100644 --- a/t/04io.t +++ b/t/04io.t @@ -14,8 +14,11 @@ $r->content('STDIN'); $r->content_length(5); $r->content_type('text/plain'); -my $c = HTTP::Request::AsCGI->new($r); -$c->stderr(IO::File->new_tmpfile); +my $c = HTTP::Request::AsCGI->new( + request => $r, + stderr => IO::File->new_tmpfile +); + $c->setup; print STDOUT 'STDOUT';