Continue WIP
[git/cygwin-packages/biber.git] / prereqs09 / perl-Mozilla-CA / achim.patch
1 --- origsrc/Mozilla-CA-20160104/MANIFEST 2016-01-04 02:17:34.000000000 +0100
2 +++ src/Mozilla-CA-20160104/MANIFEST 2016-01-16 18:37:42.153344400 +0100
3 @@ -1,5 +1,4 @@
4 lib/Mozilla/CA.pm
5 -lib/Mozilla/CA/cacert.pem
6 Makefile.PL
7 MANIFEST This list of files
8 README
9 --- origsrc/Mozilla-CA-20160104/Makefile.PL 2015-08-26 07:45:50.000000000 +0200
10 +++ src/Mozilla-CA-20160104/Makefile.PL 2016-01-16 18:37:42.168970800 +0100
11 @@ -40,3 +40,11 @@ BEGIN {
12 ExtUtils::MakeMaker::WriteMakefile(%arg);
13 };
14 }
15 +
16 +package MY;
17 +sub MY::libscan {
18 + my $name = shift->SUPER::libscan(@_);
19 + # Remove private certificate bundle
20 + if ($name =~ /cacert.pem\z/) { $name = '' };
21 + return $name;
22 +}
23 --- origsrc/Mozilla-CA-20160104/lib/Mozilla/CA.pm 2016-01-04 02:17:07.000000000 +0100
24 +++ src/Mozilla-CA-20160104/lib/Mozilla/CA.pm 2016-01-16 18:37:42.168970800 +0100
25 @@ -3,16 +3,10 @@ package Mozilla::CA;
26 use strict;
27 our $VERSION = '20160104';
28
29 -use Cwd ();
30 use File::Spec ();
31 -use File::Basename qw(dirname);
32
33 sub SSL_ca_file {
34 - my $file = File::Spec->catfile(dirname(__FILE__), "CA", "cacert.pem");
35 - if (!File::Spec->file_name_is_absolute($file)) {
36 - $file = File::Spec->catfile(Cwd::cwd(), $file);
37 - }
38 - return $file;
39 + return File::Spec->catfile('/etc/pki/tls/certs/ca-bundle.crt');
40 }
41
42 1;
This page took 0.03277 seconds and 5 git commands to generate.