diff options
author | Jesse Vincent <jesse@bestpractical.com> | 2010-03-14 17:51:55 +0000 |
---|---|---|
committer | Jesse Vincent <jesse@bestpractical.com> | 2010-03-14 17:51:55 +0000 |
commit | a56dbb5edccbd6ffb02df1df65f174e7d74fdf37 (patch) | |
tree | 162da9541ca4b8aa69facff59652363e73599285 /Porting | |
parent | aac88411846d4935bc0d5fe1ab60ffc3526d5961 (diff) | |
download | perl-a56dbb5edccbd6ffb02df1df65f174e7d74fdf37.tar.gz |
Further updates to perldelta:
rewrapping and module list updates
Diffstat (limited to 'Porting')
-rwxr-xr-x | Porting/corelist-perldelta.pl | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/Porting/corelist-perldelta.pl b/Porting/corelist-perldelta.pl index c0aae08bc4..7e96309ae7 100755 --- a/Porting/corelist-perldelta.pl +++ b/Porting/corelist-perldelta.pl @@ -57,13 +57,15 @@ my @versions = sort keys %$corelist; my ($old, $new) = @ARGV; $old ||= $versions[-2]; $new ||= $versions[-1]; - +warn $old; +warn $new; $deprecated = $Module::CoreList::deprecated{$new}; my (@new,@deprecated,@removed,@pragmas,@modules); # %Modules defines what is currently in core for my $k ( keys %Modules ) { + warn "Considering $k"; next unless exists $corelist->{$new}{$k}; my $old_ver = $corelist->{$old}{$k}; my $new_ver = $corelist->{$new}{$k}; |