at v206 759 B view raw
1Use $SSL_CERT_FILE to get the CA certificates. 2 3diff -ru -x '*~' LWP-Protocol-https-6.02-orig/lib/LWP/Protocol/https.pm LWP-Protocol-https-6.02/lib/LWP/Protocol/https.pm 4--- LWP-Protocol-https-6.02-orig/lib/LWP/Protocol/https.pm 2011-03-27 13:54:01.000000000 +0200 5+++ LWP-Protocol-https-6.02/lib/LWP/Protocol/https.pm 2011-10-07 13:23:41.398628375 +0200 6@@ -21,6 +21,11 @@ 7 } 8 if ($ssl_opts{SSL_verify_mode}) { 9 unless (exists $ssl_opts{SSL_ca_file} || exists $ssl_opts{SSL_ca_path}) { 10+ if (defined $ENV{'SSL_CERT_FILE'}) { 11+ $ssl_opts{SSL_ca_file} = $ENV{'SSL_CERT_FILE'}; 12+ } 13+ } 14+ unless (exists $ssl_opts{SSL_ca_file} || exists $ssl_opts{SSL_ca_path}) { 15 eval { 16 require Mozilla::CA; 17 };