In perl.git, the branch blead has been updated <http://perl5.git.perl.org/perl.git/commitdiff/df84fb9fdd69c2618eb0e445e6724c07d4947fa5?hp=2ca72cbebc229b6b6dc5483d0ee5776828c98d3d>
- Log ----------------------------------------------------------------- commit df84fb9fdd69c2618eb0e445e6724c07d4947fa5 Author: David Mitchell <[email protected]> Date: Mon Jun 5 12:13:20 2017 +0100 Module-CoreList/t/maintainer.t: silence warning ../dist/Module-CoreList/t/maintainer.t .. Name "Module::CoreList::released" used only once: possible typo ----------------------------------------------------------------------- Summary of changes: dist/Module-CoreList/t/maintainer.t | 3 +++ 1 file changed, 3 insertions(+) diff --git a/dist/Module-CoreList/t/maintainer.t b/dist/Module-CoreList/t/maintainer.t index 7a3d6584e4..b096269d27 100644 --- a/dist/Module-CoreList/t/maintainer.t +++ b/dist/Module-CoreList/t/maintainer.t @@ -24,5 +24,8 @@ is( scalar keys %vers, 1, 'All Module-CoreList modules should have the same $VER # Check that there is a release entry for the current perl version my $released = $Module::CoreList::released{ $] }; +# duplicate fetch to avoid 'used only once: possible typo' warning +$released = $Module::CoreList::released{ $] }; + ok( defined $released, "There is a released entry for $]" ); like( $released, qr!^\d{4}\-\d{2}\-\d{2}$!, 'It should be a date in YYYY-MM-DD format' ); -- Perl5 Master Repository
