alihanozturk
40 lines
1.3 KiB
Diff
40 lines
1.3 KiB
Diff
+--- Makefile.PL.old 2016-01-04 11:31:52.349484123 +0800
|
|
++++ Makefile.PL 2016-01-04 11:32:07.432992090 +0800
|
|
+@@ -15,7 +15,6 @@
|
|
+ 'LWP::UserAgent' => '6.06',
|
|
+ 'Net::HTTPS' => 6,
|
|
+ 'IO::Socket::SSL' => "1.54",
|
|
+- 'Mozilla::CA' => "20110101",
|
|
+ },
|
|
+ META_MERGE => {
|
|
+ resources => {
|
|
+--- lib/LWP/Protocol/https.pm.old 2016-01-04 11:33:19.003810886 +0800
|
|
++++ lib/LWP/Protocol/https.pm 2016-01-04 11:34:42.358079461 +0800
|
|
+@@ -25,25 +25,7 @@
|
|
+ }
|
|
+ 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;
|