summaryrefslogtreecommitdiff
path: root/Master/tlpkg/tlperl/lib/Module/CoreList/Utils.pm
diff options
context:
space:
mode:
Diffstat (limited to 'Master/tlpkg/tlperl/lib/Module/CoreList/Utils.pm')
-rwxr-xr-xMaster/tlpkg/tlperl/lib/Module/CoreList/Utils.pm111
1 files changed, 102 insertions, 9 deletions
diff --git a/Master/tlpkg/tlperl/lib/Module/CoreList/Utils.pm b/Master/tlpkg/tlperl/lib/Module/CoreList/Utils.pm
index 71edc4f4d07..abcb152c82d 100755
--- a/Master/tlpkg/tlperl/lib/Module/CoreList/Utils.pm
+++ b/Master/tlpkg/tlperl/lib/Module/CoreList/Utils.pm
@@ -4,9 +4,8 @@ use strict;
use warnings;
use vars qw[$VERSION %utilities];
use Module::CoreList;
-use Module::CoreList::TieHashDelta;
-$VERSION = '5.20170114_24';
+$VERSION = '5.20170922_26';
sub utilities {
my $perl = shift;
@@ -1213,6 +1212,13 @@ my %delta = (
removed => {
}
},
+ 5.022003 => {
+ delta_from => 5.022002,
+ changed => {
+ },
+ removed => {
+ }
+ },
5.024001 => {
delta_from => 5.024000,
changed => {
@@ -1220,15 +1226,102 @@ my %delta = (
removed => {
}
},
+ 5.025009 => {
+ delta_from => 5.025008,
+ changed => {
+ },
+ removed => {
+ 'c2ph' => 1,
+ 'pstruct' => 1,
+ }
+ },
+ 5.025010 => {
+ delta_from => 5.025009,
+ changed => {
+ },
+ removed => {
+ }
+ },
+ 5.025011 => {
+ delta_from => 5.025010,
+ changed => {
+ },
+ removed => {
+ }
+ },
+ 5.025012 => {
+ delta_from => 5.025011,
+ changed => {
+ },
+ removed => {
+ }
+ },
+ 5.026000 => {
+ delta_from => 5.025012,
+ changed => {
+ },
+ removed => {
+ }
+ },
+ 5.027000 => {
+ delta_from => 5.026000,
+ changed => {
+ },
+ removed => {
+ }
+ },
+ 5.027001 => {
+ delta_from => 5.027000,
+ changed => {
+ },
+ removed => {
+ }
+ },
+ 5.022004 => {
+ delta_from => 5.022003,
+ changed => {
+ },
+ removed => {
+ }
+ },
+ 5.024002 => {
+ delta_from => 5.024001,
+ changed => {
+ },
+ removed => {
+ }
+ },
+ 5.027002 => {
+ delta_from => 5.027001,
+ changed => {
+ },
+ removed => {
+ }
+ },
+ 5.027003 => {
+ delta_from => 5.027002,
+ changed => {
+ },
+ removed => {
+ }
+ },
+ 5.027004 => {
+ delta_from => 5.027003,
+ changed => {
+ },
+ removed => {
+ }
+ },
+ 5.026001 => {
+ delta_from => 5.026000,
+ changed => {
+ },
+ removed => {
+ }
+ },
);
-for my $version (sort { $a <=> $b } keys %delta) {
- my $data = $delta{$version};
-
- tie %{$utilities{$version}}, 'Module::CoreList::TieHashDelta',
- $data->{changed}, $data->{removed},
- $data->{delta_from} ? $utilities{$data->{delta_from}} : undef;
-}
+%utilities = Module::CoreList::_undelta(\%delta);
# Create aliases with trailing zeros for $] use