Mercurial > hg > nginx-tests

comparison mail_imap_ssl.t @ 753:63d1b7cb974a

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
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');