Mercurial > hg > nginx-tests
comparison mail_imap_ssl.t @ 753:63d1b7cb974a
Tests: fixed IO::Socket::SSL options in mail_imap_ssl.t.
author | Sergey Kandaurov <pluknet@nginx.com> |
---|---|
date | Tue, 27 Oct 2015 18:26:22 +0300 |
parents | b70df6924290 |
children | 55ca38e1a3d9 |
comparison
equal
deleted
inserted
replaced
752:80e17d44088c | 753:63d1b7cb974a |
---|---|
140 | 140 |
141 ############################################################################### | 141 ############################################################################### |
142 | 142 |
143 my $cred = encode_base64("\0test\@example.com\0secret", ''); | 143 my $cred = encode_base64("\0test\@example.com\0secret", ''); |
144 my %ssl = ( | 144 my %ssl = ( |
145 'SSL' => 1, | 145 SSL => 1, |
146 'SSL_verify_mode' => 'IO::Socket::SSL::SSL_VERIFY_NONE()', | 146 SSL_verify_mode => IO::Socket::SSL::SSL_VERIFY_NONE(), |
147 'SSL_error_trap' => 'sub { die $_[1] }', | 147 SSL_error_trap => sub { die $_[1] }, |
148 ); | 148 ); |
149 | 149 |
150 # no ssl connection | 150 # no ssl connection |
151 | 151 |
152 my $s = Test::Nginx::IMAP->new(PeerAddr => '127.0.0.1:8142'); | 152 my $s = Test::Nginx::IMAP->new(PeerAddr => '127.0.0.1:8142'); |