moparisthebest/wget
1
0
Fork 0
mirror of https://github.com/moparisthebest/wget synced 2024-07-03 16:38:41 -04:00
Code Issues Releases Wiki Activity

Skip HTTPS perl tests if IO::Socket::SSL not installed

Browse Source 
* tests/Test-proxied-https-auth-keepalive.px: Skip test if perl module
  IO::Socket::SSL is not installed (trivial change).
* tests/Test-proxied-https-auth.px: Skip test if perl module
  IO::Socket::SSL is not installed (trivial change).
This commit is contained in:
christian fafard 2015-10-12 09:50:18 +02:00 committed by Tim Rühsen
parent f5a63e3100
commit b8ee370571
2 changed files with 16 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
tests/Test-proxied-https-auth-keepalive.px
View File

@ -29,7 +29,14 @@ if (defined $srcdir) {
use HTTP::Daemon; use HTTP::Daemon;
use HTTP::Request; use HTTP::Request;
use IO::Socket::SSL; # Skip this test rather than fail it when the module isn't installed
if (!eval {require IO::Socket::SSL;1;}) {
print STDERR "This test needs the perl module \"IO::Socket::SSL\".\n";
print STDERR "Install e.g. on Debian with 'apt-get install libio-socket-ssl-perl'\n";
print STDERR " or if using cpanminus 'cpanm IO::Socket::SSL' could be used to install it.\n";
exit 77; # skip
}
IO::Socket::SSL->import();
my $SOCKET = HTTP::Daemon->new (LocalAddr => 'localhost', my $SOCKET = HTTP::Daemon->new (LocalAddr => 'localhost',
ReuseAddr => 1) or die "Cannot create server!!!"; ReuseAddr => 1) or die "Cannot create server!!!";

9
tests/Test-proxied-https-auth.px
View File

@ -29,7 +29,14 @@ if (defined $srcdir) {
use HTTP::Daemon; use HTTP::Daemon;
use HTTP::Request; use HTTP::Request;
use IO::Socket::SSL; # Skip this test rather than fail it when the module isn't installed
if (!eval {require IO::Socket::SSL;1;}) {
print STDERR "This test needs the perl module \"IO::Socket::SSL\".\n";
print STDERR "Install e.g. on Debian with 'apt-get install libio-socket-ssl-perl'\n";
print STDERR " or if using cpanminus 'cpanm IO::Socket::SSL' could be used to install it.\n";
exit 77; # skip
}
IO::Socket::SSL->import();
my $SOCKET = HTTP::Daemon->new (LocalAddr => 'localhost', my $SOCKET = HTTP::Daemon->new (LocalAddr => 'localhost',
ReuseAddr => 1) or die "Cannot create server!!!"; ReuseAddr => 1) or die "Cannot create server!!!";