diff options
Diffstat (limited to 'system/perl/fix-test-chris-williams-tcp-server.patch')
-rw-r--r-- | system/perl/fix-test-chris-williams-tcp-server.patch | 14 |
1 files changed, 14 insertions, 0 deletions
diff --git a/system/perl/fix-test-chris-williams-tcp-server.patch b/system/perl/fix-test-chris-williams-tcp-server.patch new file mode 100644 index 000000000..bc932924c --- /dev/null +++ b/system/perl/fix-test-chris-williams-tcp-server.patch @@ -0,0 +1,14 @@ +diff -ur a/cpan/IO-Socket-IP/t/31nonblocking-connect-internet.t b/cpan/IO-Socket-IP/t/31nonblocking-connect-internet.t +--- a/cpan/IO-Socket-IP/t/31nonblocking-connect-internet.t 2023-02-08 14:44:25.658759177 -0600 ++++ b/cpan/IO-Socket-IP/t/31nonblocking-connect-internet.t 2023-02-08 14:45:27.444140680 -0600 +@@ -11,8 +11,8 @@ + use IO::Socket::INET; + use Errno qw( EINPROGRESS EWOULDBLOCK ECONNREFUSED ); + +-# Chris Williams (BINGOS) has offered cpanidx.org as a TCP testing server here +-my $test_host = "cpanidx.org"; ++# Chris Williams' server was not accessible 2023-02-* ++my $test_host = "www.adelielinux.org"; + my $test_good_port = 80; + my $test_bad_port = 6666; + |