Mercurial > hg > nginx-tests
comparison lib/Test/Nginx.pm @ 268:8dac281ff522
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"; |