Mercurial > hg > nginx-tests
changeset 162:465a711ffa19
Tests: set SIGALRM handler before arming timer.
author | Maxim Dounin <mdounin@mdounin.ru> |
---|---|
date | Mon, 01 Aug 2011 20:23:32 +0400 |
parents | 2c07dc5bc354 |
children | 450206ed1fd2 |
files | lib/Test/Nginx/IMAP.pm lib/Test/Nginx/POP3.pm lib/Test/Nginx/SMTP.pm |
diffstat | 3 files changed, 3 insertions(+), 3 deletions(-) [+] |
line wrap: on
line diff
--- a/lib/Test/Nginx/IMAP.pm Fri Jul 29 02:28:45 2011 +0400 +++ b/lib/Test/Nginx/IMAP.pm Mon Aug 01 20:23:32 2011 +0400 @@ -41,8 +41,8 @@ sub read { my ($self) = @_; eval { + local $SIG{ALRM} = sub { die "alarm\n" }; alarm(2); - local $SIG{ALRM} = sub { die "alarm\n" }; while (<$self>) { log_in($_); # XXX
--- a/lib/Test/Nginx/POP3.pm Fri Jul 29 02:28:45 2011 +0400 +++ b/lib/Test/Nginx/POP3.pm Mon Aug 01 20:23:32 2011 +0400 @@ -41,8 +41,8 @@ sub read { my ($self) = @_; eval { + local $SIG{ALRM} = sub { die "alarm\n" }; alarm(2); - local $SIG{ALRM} = sub { die "alarm\n" }; while (<$self>) { log_in($_); # XXX
--- a/lib/Test/Nginx/SMTP.pm Fri Jul 29 02:28:45 2011 +0400 +++ b/lib/Test/Nginx/SMTP.pm Mon Aug 01 20:23:32 2011 +0400 @@ -41,8 +41,8 @@ sub read { my ($self) = @_; eval { + local $SIG{ALRM} = sub { die "alarm\n" }; alarm(2); - local $SIG{ALRM} = sub { die "alarm\n" }; while (<$self>) { log_in($_); next if m/^\d\d\d-/;