summaryrefslogtreecommitdiff
path: root/Porting/corelist-perldelta.pl
diff options
context:
space:
mode:
authorJesse Vincent <jesse@bestpractical.com>2010-03-14 17:51:55 +0000
committerJesse Vincent <jesse@bestpractical.com>2010-03-14 17:51:55 +0000
commita56dbb5edccbd6ffb02df1df65f174e7d74fdf37 (patch)
tree162da9541ca4b8aa69facff59652363e73599285 /Porting/corelist-perldelta.pl
parentaac88411846d4935bc0d5fe1ab60ffc3526d5961 (diff)
downloadperl-a56dbb5edccbd6ffb02df1df65f174e7d74fdf37.tar.gz
Further updates to perldelta:
rewrapping and module list updates
Diffstat (limited to 'Porting/corelist-perldelta.pl')
-rwxr-xr-xPorting/corelist-perldelta.pl4
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};