In perl.git, the branch blead has been updated <http://perl5.git.perl.org/perl.git/commitdiff/1c2c5f8e76ec81406f2cf2adeeadbd2a42dc5549?hp=af42750f1c24faefffa8e5ab4b3f3fbfb238992f>
- Log ----------------------------------------------------------------- commit 1c2c5f8e76ec81406f2cf2adeeadbd2a42dc5549 Merge: af42750... ab87ca4... Author: David Golden <[email protected]> Date: Mon Oct 19 21:36:50 2009 -0400 Merge branch 'corelist-deprecated' into blead commit ab87ca4d8e09a76494b6bc14f086623c2de4f79e Author: David Golden <[email protected]> Date: Mon Oct 19 21:36:16 2009 -0400 formally mark deprecations in Maintainers.pl M Porting/Maintainers.pl ----------------------------------------------------------------------- Summary of changes: Porting/Maintainers.pl | 13 ++++++++++++- 1 files changed, 12 insertions(+), 1 deletions(-) diff --git a/Porting/Maintainers.pl b/Porting/Maintainers.pl index b07fa5c..9a76bcd 100755 --- a/Porting/Maintainers.pl +++ b/Porting/Maintainers.pl @@ -147,6 +147,14 @@ use File::Glob qw(:case); # full pathname (eg 't/foo.t') or a pattern (e.g. qr{^t/}). # It defaults to the empty list. +# DEPRECATED contains the *first* version of Perl in which the module +# was considered deprecated. It should only be present if the module is +# actually deprecated. Such modules should use deprecated.pm to +# issue a warning if used. E.g.: +# +# use if $] >= 5.011, 'deprecate'; +# + # MAP is a hash that maps CPAN paths to their core equivalents. # Each key reprepresents a string prefix, with longest prefixes checked # first. The first match causes that prefix to be replaced with the @@ -321,6 +329,7 @@ use File::Glob qw(:case); 'FILES' => q[cpan/Class-ISA], 'CPAN' => 1, 'UPSTREAM' => 'cpan', + 'DEPRECATED' => 5.011, }, 'Compress::Raw::Bzip2' => @@ -1275,7 +1284,7 @@ use File::Glob qw(:case); 'CPAN' => 1, 'UPSTREAM' => 'blead', 'EXCLUDED' => [ qw(t/pod.t t/pod-coverage.t) ], - # DEPRECATED => 5.11.0, + 'DEPRECATED' => 5.011, }, 'Pod::Simple' => @@ -1348,6 +1357,7 @@ use File::Glob qw(:case); 'EXCLUDED' => [ qw{ t/01_use.t t/99_pod.t } ], 'CPAN' => 1, 'UPSTREAM' => undef, + 'DEPRECATED' => 5.011, }, 'Storable' => @@ -1367,6 +1377,7 @@ use File::Glob qw(:case); 'FILES' => q[dist/Switch], 'CPAN' => 1, 'UPSTREAM' => 'blead', + 'DEPRECATED' => 5.011, }, 'Sys::Syslog' => -- Perl5 Master Repository
