at 16.09-beta 778 B view raw
1diff -ru -x '*~' LWP-Protocol-https-6.04-orig/lib/LWP/Protocol/https.pm LWP-Protocol-https-6.04/lib/LWP/Protocol/https.pm 2--- LWP-Protocol-https-6.04-orig/lib/LWP/Protocol/https.pm 2013-04-29 23:16:18.000000000 +0200 3+++ LWP-Protocol-https-6.04/lib/LWP/Protocol/https.pm 2016-03-02 14:59:01.639844511 +0100 4@@ -24,6 +24,11 @@ 5 } 6 if ($ssl_opts{SSL_verify_mode}) { 7 unless (exists $ssl_opts{SSL_ca_file} || exists $ssl_opts{SSL_ca_path}) { 8+ $ssl_opts{SSL_ca_file} = $ENV{'SSL_CERT_FILE'}; 9+ $ssl_opts{SSL_ca_file} = "/etc/ssl/certs/ca-certificates.crt" 10+ if !defined $ssl_opts{SSL_ca_file} && -e "/etc/ssl/certs/ca-certificates.crt"; 11+ } 12+ unless (exists $ssl_opts{SSL_ca_file} || exists $ssl_opts{SSL_ca_path}) { 13 eval { 14 require Mozilla::CA; 15 };