Mercurial > hg > nginx-tests
changeset 243:de7338227832
Tests: removed trailing spaces.
author | Homutov Vladimir <vl@nginx.com> |
---|---|
date | Mon, 14 Jan 2013 16:57:50 +0400 |
parents | 8f280348d76f |
children | a675a0d1d19d |
files | lib/Test/Nginx.pm lib/Test/Nginx/IMAP.pm lib/Test/Nginx/POP3.pm lib/Test/Nginx/SMTP.pm ssl_sni.t |
diffstat | 5 files changed, 7 insertions(+), 7 deletions(-) [+] |
line wrap: on
line diff
--- a/lib/Test/Nginx.pm Mon Nov 26 03:47:31 2012 +0400 +++ b/lib/Test/Nginx.pm Mon Jan 14 16:57:50 2013 +0400 @@ -336,7 +336,7 @@ $s .= "access_log $self->{_testdir}/access.log;\n"; $s .= "client_body_temp_path $self->{_testdir}/client_body_temp;\n"; - $s .= "fastcgi_temp_path $self->{_testdir}/fastcgi_temp;\n" + $s .= "fastcgi_temp_path $self->{_testdir}/fastcgi_temp;\n" if $self->has_module('fastcgi'); $s .= "proxy_temp_path $self->{_testdir}/proxy_temp;\n"
--- a/lib/Test/Nginx/IMAP.pm Mon Nov 26 03:47:31 2012 +0400 +++ b/lib/Test/Nginx/IMAP.pm Mon Jan 14 16:57:50 2013 +0400 @@ -65,7 +65,7 @@ } sub ok { - my $self = shift; + my $self = shift; Test::More->builder->like($self->read(), qr/^\S+ OK/, @_); }
--- a/lib/Test/Nginx/POP3.pm Mon Nov 26 03:47:31 2012 +0400 +++ b/lib/Test/Nginx/POP3.pm Mon Jan 14 16:57:50 2013 +0400 @@ -65,7 +65,7 @@ } sub ok { - my $self = shift; + my $self = shift; Test::More->builder->like($self->read(), qr/^\+OK/, @_); }
--- a/lib/Test/Nginx/SMTP.pm Mon Nov 26 03:47:31 2012 +0400 +++ b/lib/Test/Nginx/SMTP.pm Mon Jan 14 16:57:50 2013 +0400 @@ -64,12 +64,12 @@ } sub ok { - my $self = shift; + my $self = shift; Test::More->builder->like($self->read(), qr/^2\d\d /, @_); } sub authok { - my $self = shift; + my $self = shift; Test::More->builder->like($self->read(), qr/^235 /, @_); }
--- a/ssl_sni.t Mon Nov 26 03:47:31 2012 +0400 +++ b/ssl_sni.t Mon Jan 14 16:57:50 2013 +0400 @@ -66,7 +66,7 @@ eval { require IO::Socket::SSL; die if $IO::Socket::SSL::VERSION < 1.56; }; plan(skip_all => 'IO::Socket::SSL version >= 1.56 required') if $@; -eval { +eval { my $ctx = Net::SSLeay::CTX_new() or die; my $ssl = Net::SSLeay::new($ctx) or die; Net::SSLeay::set_tlsext_host_name($ssl, 'example.org') == 1 or die; @@ -153,7 +153,7 @@ } sub https_get_host { - my ($host, $sni) = @_; + my ($host, $sni) = @_; my $s = get_ssl_socket($sni ? $sni : $host); return http(<<EOF, socket => $s);