"Fossies" - the Fresh Open Source Software Archive  

Source code changes of the file "dist/Module-CoreList/lib/Module/CoreList/Utils.pm" between
perl-5.30.2.tar.xz and perl-5.30.3.tar.xz

About: Perl (Practical Extraction and Report Language) is a high-level, general-purpose, interpreted, dynamic programming language. Latest stable release.

Utils.pm  (perl-5.30.2.tar.xz)	:	Utils.pm  (perl-5.30.3.tar.xz)
package Module::CoreList::Utils;		package Module::CoreList::Utils;
use strict;		use strict;
use warnings;		use warnings;
use Module::CoreList;		use Module::CoreList;
our $VERSION = '5.20200314';		our $VERSION = '5.20200601_30';
our %utilities;		our %utilities;
sub utilities {		sub utilities {
my $perl = shift;		my $perl = shift;
$perl = shift if eval { $perl->isa(__PACKAGE__) };		$perl = shift if eval { $perl->isa(__PACKAGE__) };
return unless $perl or exists $utilities{$perl};		return unless $perl or exists $utilities{$perl};
return sort keys %{ $utilities{$perl} };		return sort keys %{ $utilities{$perl} };
}		}
sub _released_order { # Sort helper, to make '?' sort after everything else		sub _released_order { # Sort helper, to make '?' sort after everything else
skipping to change at line 1590		skipping to change at line 1590
removed => {		removed => {
}		}
},		},
5.030002 => {		5.030002 => {
delta_from => 5.030001,		delta_from => 5.030001,
changed => {		changed => {
},		},
removed => {		removed => {
}		}
},		},
		5.031010 => {
		delta_from => 5.031009,
		changed => {
		},
		removed => {
		}
		},
		5.031011 => {
		delta_from => 5.031010,
		changed => {
		},
		removed => {
		}
		},
		5.030003 => {
		delta_from => 5.030002,
		changed => {
		},
		removed => {
		}
		},
);		);
%utilities = Module::CoreList::_undelta(\%delta);		%utilities = Module::CoreList::_undelta(\%delta);
# Create aliases with trailing zeros for $] use		# Create aliases with trailing zeros for $] use
$utilities{'5.000'} = $utilities{5};		$utilities{'5.000'} = $utilities{5};
_create_aliases(\%utilities);		_create_aliases(\%utilities);
End of changes. 2 change blocks.
1 lines changed or deleted		22 lines changed or added

---