Mercurial > hg > nginx-tests
comparison ssl_password_file.t @ 663:4765f3981d91
Tests: fixed extra check for the presence of SSL_VERIFY_NONE.
author | Sergey Kandaurov <pluknet@nginx.com> |
---|---|
date | Wed, 26 Aug 2015 14:14:31 +0300 |
parents | 907e89fba9c3 |
children | e9064d691790 |
comparison
equal
deleted
inserted
replaced
662:07de3d202eb7 | 663:4765f3981d91 |
---|---|
23 ############################################################################### | 23 ############################################################################### |
24 | 24 |
25 select STDERR; $| = 1; | 25 select STDERR; $| = 1; |
26 select STDOUT; $| = 1; | 26 select STDOUT; $| = 1; |
27 | 27 |
28 eval { require IO::Socket::SSL; IO::Socket::SSL::SSL_VERIFY_NONE(); }; | 28 eval { require IO::Socket::SSL; }; |
29 plan(skip_all => 'IO::Socket::SSL not installed') if $@; | 29 plan(skip_all => 'IO::Socket::SSL not installed') if $@; |
30 eval { IO::Socket::SSL::SSL_VERIFY_NONE(); }; | 30 eval { IO::Socket::SSL::SSL_VERIFY_NONE(); }; |
31 plan(skip_all => 'IO::Socket::SSL too old') if $@; | 31 plan(skip_all => 'IO::Socket::SSL too old') if $@; |
32 | 32 |
33 plan(skip_all => 'win32') if $^O eq 'MSWin32'; | 33 plan(skip_all => 'win32') if $^O eq 'MSWin32'; |