diff options
author | Richard Levitte <levitte@openssl.org> | 2018-05-19 07:09:19 +0200 |
---|---|---|
committer | Richard Levitte <levitte@openssl.org> | 2018-05-20 10:13:08 +0200 |
commit | 246bd8fd0507f4555432c148eed5a9322c113bf5 (patch) | |
tree | 1467b411267b42fd39dbddfc9138e7f28003b844 /util | |
parent | 6439e343fa64f06941197d085acd11bd13856596 (diff) |
Windows: don't install __DECC_*.H
This adds the possibility to exclude files by regexp in util/copy.pl
Partial fix for #3254
Reviewed-by: Tim Hudson <tjh@openssl.org>
Reviewed-by: Rich Salz <rsalz@openssl.org>
(Merged from https://github.com/openssl/openssl/pull/6303)
Diffstat (limited to 'util')
-rw-r--r-- | util/copy.pl | 10 |
1 files changed, 8 insertions, 2 deletions
diff --git a/util/copy.pl b/util/copy.pl index f93fb251db..ca4697a230 100644 --- a/util/copy.pl +++ b/util/copy.pl @@ -18,6 +18,7 @@ use Fcntl; my $stripcr = 0; my $arg; +my @excludes = (); foreach $arg (@ARGV) { if ($arg eq "-stripcr") @@ -25,11 +26,16 @@ foreach $arg (@ARGV) { $stripcr = 1; next; } + if ($arg =~ /^-exclude_re=(.*)$/) + { + push @excludes, $1; + next; + } $arg =~ s|\\|/|g; # compensate for bug/feature in cygwin glob... $arg = qq("$arg") if ($arg =~ /\s/); # compensate for bug in 5.10... - foreach (glob $arg) + foreach my $f (glob $arg) { - push @filelist, $_; + push @filelist, $f unless grep { $f =~ /$_/ } @excludes; } } |