diff options
Diffstat (limited to 'abs/core/perl_modules/perl-lwp-protocol-https/certs.patch')
| -rw-r--r-- | abs/core/perl_modules/perl-lwp-protocol-https/certs.patch | 43 |
1 files changed, 43 insertions, 0 deletions
diff --git a/abs/core/perl_modules/perl-lwp-protocol-https/certs.patch b/abs/core/perl_modules/perl-lwp-protocol-https/certs.patch new file mode 100644 index 0000000..a2edc40 --- /dev/null +++ b/abs/core/perl_modules/perl-lwp-protocol-https/certs.patch @@ -0,0 +1,43 @@ +diff --git a/Makefile.PL.orig b/Makefile.PL +index fc8ef4a..26313e2 100644 +--- a/Makefile.PL.orig ++++ b/Makefile.PL +@@ -26,7 +26,6 @@ my %WriteMakefileArgs = ( + 'LWP::UserAgent' => '6.06', + 'Net::HTTPS' => 6, + 'IO::Socket::SSL' => "1.54", +- 'Mozilla::CA' => "20110101", + 'perl' => '5.008001', + }, + }, +diff --git a/lib/LWP/Protocol/https.pm.orig b/lib/LWP/Protocol/https.pm +index ed4d832..b8667cf 100644 +--- a/lib/LWP/Protocol/https.pm.orig ++++ b/lib/LWP/Protocol/https.pm +@@ -25,25 +25,7 @@ sub _extra_sock_opts + } + if ($ssl_opts{SSL_verify_mode}) { + unless (exists $ssl_opts{SSL_ca_file} || exists $ssl_opts{SSL_ca_path}) { +- eval { +- require Mozilla::CA; +- }; +- if ($@) { +- if ($@ =~ /^Can't locate Mozilla\/CA\.pm/) { +- $@ = <<'EOT'; +-Can't verify SSL peers without knowing which Certificate Authorities to trust +- +-This problem can be fixed by either setting the PERL_LWP_SSL_CA_FILE +-environment variable or by installing the Mozilla::CA module. +- +-To disable verification of SSL peers set the PERL_LWP_SSL_VERIFY_HOSTNAME +-environment variable to 0. If you do this you can't be sure that you +-communicate with the expected peer. +-EOT +- } +- die $@; +- } +- $ssl_opts{SSL_ca_file} = Mozilla::CA::SSL_ca_file(); ++ $ssl_opts{SSL_ca_file} = '/etc/ssl/certs/ca-certificates.crt'; + } + } + $self->{ssl_opts} = \%ssl_opts; |