Mercurial > hg > nginx-tests

comparison lib/Test/Nginx.pm @ 268:8dac281ff522

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Tests: increase timeout for putting big chunk in dav_chunked.t.
author Valentin Bartenev <vbart@nginx.com>
date Wed, 20 Mar 2013 18:20:28 +0400
parents f440a8acbf39
children f857180657c9
comparison
equal deleted inserted replaced
267:9cd1a8dd47fc 268:8dac281ff522
403 my ($request, %extra) = @_; 403 my ($request, %extra) = @_;
404 my $reply; 404 my $reply;
405 eval { 405 eval {
406 local $SIG{ALRM} = sub { die "timeout\n" }; 406 local $SIG{ALRM} = sub { die "timeout\n" };
407 local $SIG{PIPE} = sub { die "sigpipe\n" }; 407 local $SIG{PIPE} = sub { die "sigpipe\n" };
408 alarm(2); 408 alarm($extra{timeout} || 2);
409 my $s = $extra{socket} || IO::Socket::INET->new( 409 my $s = $extra{socket} || IO::Socket::INET->new(
410 Proto => 'tcp', 410 Proto => 'tcp',
411 PeerAddr => '127.0.0.1:8080' 411 PeerAddr => '127.0.0.1:8080'
412 ) 412 )
413 or die "Can't connect to nginx: $!\n"; 413 or die "Can't connect to nginx: $!\n";