summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorSawyer X <xsawyerx@cpan.org>2018-04-19 14:58:37 +0200
committerSawyer X <xsawyerx@cpan.org>2018-04-19 14:58:37 +0200
commit9dd03700df34998d21d869b9dc1b32c8e8148a75 (patch)
tree921958e4c9df0be3cbb760b2e9b82e0fad7c595b
parent58329f0d73bc9695e7cbea998f3852609ad78c3b (diff)
downloadperl-9dd03700df34998d21d869b9dc1b32c8e8148a75.tar.gz
Devel-PPPort: Skip entries marked as deprecated or unstable:
This commit was available in the Github repo. Original commit: commit 5cc4d70ad5d47c2850e4eb205c6c69936af7ddb4 Author: Marcus Holland-Moritz <mhx@cpan.org> Date: Sat Aug 27 17:05:34 2016 +0100 Skip entries marked as deprecated or unstable From: Karl Williamson <public@khwilliamson.com> Date: Fri, 26 Aug 2016 13:14:56 -0600 Message-ID: <dea0d899-ee5c-3e76-99a1-e53dc05fdb92@khwilliamson.com> It seems to me that if a function is listed in embed.fnc as deprecated or unstable, it shouldn't get listed.in D::P as needing to be backported.
-rw-r--r--dist/Devel-PPPort/parts/ppptools.pl1
1 files changed, 1 insertions, 0 deletions
diff --git a/dist/Devel-PPPort/parts/ppptools.pl b/dist/Devel-PPPort/parts/ppptools.pl
index 62e533909d..6981b1bd20 100644
--- a/dist/Devel-PPPort/parts/ppptools.pl
+++ b/dist/Devel-PPPort/parts/ppptools.pl
@@ -306,6 +306,7 @@ sub parse_embed
my @e = split /\s*\|\s*/, $line;
if( @e >= 3 ) {
my($flags, $ret, $name, @args) = @e;
+ next if $flags =~ /[DM]/; # Skip entries marked as deprecated or unstable
if ($name =~ /^[^\W\d]\w*$/) {
for (@args) {
$_ = [trim_arg($_)];