diff -Nru libversion-next-perl-0.002/Changes libversion-next-perl-0.004/Changes --- libversion-next-perl-0.002/Changes 2010-10-01 17:46:11.000000000 +0000 +++ libversion-next-perl-0.004/Changes 2014-03-07 11:24:07.000000000 +0000 @@ -1,5 +1,22 @@ Revision history for Version-Next +0.004 2014-03-07 06:24:03-05:00 America/New_York + + [CHANGED] + + - Now requires inputs to pass version::is_lax(), but does some + sanitization of excessivly lax inputs + +0.003 2014-03-06 10:11:34-05:00 America/New_York + + [DOCUMENTED] + + - Clarified SYNOPSIS to show explicit import (Grzegorz Rożniecki) + + [CHANGED] + + - Updated dist.ini and meta files + 0.002 2010-10-01 13:46:06 EST5EDT - Don't specify minimum Carp version (fails on 5.6.x) diff -Nru libversion-next-perl-0.002/CONTRIBUTING libversion-next-perl-0.004/CONTRIBUTING --- libversion-next-perl-0.002/CONTRIBUTING 1970-01-01 00:00:00.000000000 +0000 +++ libversion-next-perl-0.004/CONTRIBUTING 2014-03-07 11:24:07.000000000 +0000 @@ -0,0 +1,100 @@ +## HOW TO CONTRIBUTE + +Thank you for considering contributing to this distribution. This file +contains instructions that will help you work with the source code. + +The distribution is managed with Dist::Zilla. This means than many of the +usual files you might expect are not in the repository, but are generated at +release time (e.g. Makefile.PL). + +Generally, **you do not need Dist::Zilla to contribute patches**. You do need +Dist::Zilla to create a tarball and/or install from the repository. See below +for guidance. + +### Getting dependencies + +See the included `cpanfile` file for a list of dependencies. If you have +App::cpanminus 1.6 or later installed, you can use `cpanm` to satisfy +dependencies like this: + + $ cpanm --installdeps . + +Otherwise, you can install Module::CPANfile 1.0002 or later and then satisfy +dependencies with the regular `cpan` client and `cpanfile-dump`: + + $ cpan `cpanfile-dump` + +### Running tests + +You can run tests directly using the `prove` tool: + + $ prove -l + $ prove -lv t/some_test_file.t + +For most of my distributions, `prove` is entirely sufficient for you to test any +patches you have. I use `prove` for 99% of my testing during development. + +### Code style and tidying + +Please try to match any existing coding style. If there is a `.perltidyrc` +file, please install Perl::Tidy and use perltidy before submitting patches. + +If there is a `tidyall.ini` file, you can also install Code::TidyAll and run +`tidyall` on a file or `tidyall -a` to tidy all files. + +### Patching documentation + +Much of the documentation Pod is generated at release time. Depending on the +distribution, some of my documentation may be written in a Pod dialect called +WikiDoc. (See Pod::WikiDoc on CPAN.) + +If you would like to submit a documentation edit, please limit yourself to the +documentation you see. + +If you see typos or documentation issues in the generated docs, please +email or open a bug ticket instead of patching. + +### Installing from the repository + +If you want to install directly from the repository, you need to have +Dist::Zilla installed (see below). If this is a burden to you, I welcome +patches against a CPAN tarball instead of the repository. + +### Installing and using Dist::Zilla + +Dist::Zilla is a very powerful authoring tool, optimized for maintaining a +large number of distributions with a high degree of automation, but it has a +large dependency chain, a bit of a learning curve and requires a number of +author-specific plugins. + +To install it from CPAN, I recommend one of the following approaches for +the quickest installation: + + # using CPAN.pm, but bypassing non-functional pod tests + $ cpan TAP::Harness::Restricted + $ PERL_MM_USE_DEFAULT=1 HARNESS_CLASS=TAP::Harness::Restricted cpan Dist::Zilla + + # using cpanm, bypassing *all* tests + $ cpanm -n Dist::Zilla + +In either case, it's probably going to take about 10 minutes. Go for a walk, +go get a cup of your favorite beverage, take a bathroom break, or whatever. +When you get back, Dist::Zilla should be ready for you. + +Then you need to install any plugins specific to this distribution: + + $ cpan `dzil authordeps` + $ dzil authordeps | cpanm + +Once installed, here are some dzil commands you might try: + + $ dzil build + $ dzil test + $ dzil xtest + +To install from the repository, use: + + $ dzil install + +You can learn more about Dist::Zilla at http://dzil.org/ + diff -Nru libversion-next-perl-0.002/cpanfile libversion-next-perl-0.004/cpanfile --- libversion-next-perl-0.002/cpanfile 1970-01-01 00:00:00.000000000 +0000 +++ libversion-next-perl-0.004/cpanfile 2014-03-07 11:24:07.000000000 +0000 @@ -0,0 +1,37 @@ +requires "Carp" => "0"; +requires "Sub::Exporter" => "0"; +requires "perl" => "5.006"; +requires "strict" => "0"; +requires "version" => "0.81"; +requires "warnings" => "0"; + +on 'test' => sub { + requires "ExtUtils::MakeMaker" => "0"; + requires "File::Spec::Functions" => "0"; + requires "List::Util" => "0"; + requires "Test::Exception" => "0.29"; + requires "Test::More" => "0.88"; +}; + +on 'test' => sub { + recommends "CPAN::Meta" => "0"; + recommends "CPAN::Meta::Requirements" => "2.120900"; +}; + +on 'configure' => sub { + requires "ExtUtils::MakeMaker" => "6.17"; +}; + +on 'develop' => sub { + requires "Dist::Zilla" => "5.013"; + requires "Dist::Zilla::PluginBundle::DAGOLDEN" => "0.060"; + requires "File::Spec" => "0"; + requires "File::Temp" => "0"; + requires "IO::Handle" => "0"; + requires "IPC::Open3" => "0"; + requires "Pod::Coverage::TrustPod" => "0"; + requires "Test::CPAN::Meta" => "0"; + requires "Test::More" => "0"; + requires "Test::Pod" => "1.41"; + requires "Test::Pod::Coverage" => "1.08"; +}; diff -Nru libversion-next-perl-0.002/debian/changelog libversion-next-perl-0.004/debian/changelog --- libversion-next-perl-0.002/debian/changelog 2011-01-03 04:25:52.000000000 +0000 +++ libversion-next-perl-0.004/debian/changelog 2014-03-07 20:50:48.000000000 +0000 @@ -1,3 +1,37 @@ +libversion-next-perl (0.004-1) unstable; urgency=low + + [ Ansgar Burchardt ] + * debian/control: Convert Vcs-* fields to Git. + + [ Alessandro Ghedini ] + * Email change: Alessandro Ghedini -> ghedo@debian.org + + [ gregor herrmann ] + * debian/control: update {versioned,alternative} (build) dependencies. + + [ Salvatore Bonaccorso ] + * Change Vcs-Git to canonical URI (git://anonscm.debian.org) + * Change search.cpan.org based URIs to metacpan.org based URIs + + [ Axel Beckert ] + * debian/copyright: migrate pre-1.0 format to 1.0 using "cme fix dpkg- + copyright" + + [ gregor herrmann ] + * Strip trailing slash from metacpan URLs. + + [ Florian Schlichting ] + * Import Upstream version 0.004 + * Bump year of upstream copyright + * Ship CONTRIBUTING documentation + * Bump dh compatibility to level 8 (no changes necessary) + * Update stand-alone license paragraphs to commonly used version (not + limiting Debian to GNU/Linux) + * Declare compliance with Debian Policy 3.9.5 + * Add myself to uploaders and copyright + + -- Florian Schlichting Fri, 07 Mar 2014 21:50:41 +0100 + libversion-next-perl (0.002-1) unstable; urgency=low * Initial Release. (Closes: #606855) diff -Nru libversion-next-perl-0.002/debian/compat libversion-next-perl-0.004/debian/compat --- libversion-next-perl-0.002/debian/compat 2010-12-09 12:13:11.000000000 +0000 +++ libversion-next-perl-0.004/debian/compat 2014-03-07 20:48:01.000000000 +0000 @@ -1 +1 @@ -7 +8 diff -Nru libversion-next-perl-0.002/debian/control libversion-next-perl-0.004/debian/control --- libversion-next-perl-0.002/debian/control 2011-01-02 15:56:43.000000000 +0000 +++ libversion-next-perl-0.004/debian/control 2014-03-07 20:50:21.000000000 +0000 @@ -1,20 +1,24 @@ Source: libversion-next-perl -Section: perl -Priority: optional -Build-Depends: debhelper (>= 7) -Build-Depends-Indep: libsub-exporter-perl, libtest-exception-perl (>= 0.29), - perl, perl (>= 5.10.1) | libtest-simple-perl (>= 0.88) Maintainer: Debian Perl Group Uploaders: Tim Retout , - Alessandro Ghedini -Standards-Version: 3.9.1 -Homepage: http://search.cpan.org/dist/Version-Next/ -Vcs-Svn: svn://svn.debian.org/pkg-perl/trunk/libversion-next-perl/ -Vcs-Browser: http://svn.debian.org/viewsvn/pkg-perl/trunk/libversion-next-perl/ + Alessandro Ghedini , + Florian Schlichting +Section: perl +Priority: optional +Build-Depends: debhelper (>= 8) +Build-Depends-Indep: libsub-exporter-perl, + libtest-exception-perl, + perl +Standards-Version: 3.9.5 +Vcs-Browser: http://anonscm.debian.org/gitweb/?p=pkg-perl/packages/libversion-next-perl.git +Vcs-Git: git://anonscm.debian.org/pkg-perl/packages/libversion-next-perl.git +Homepage: https://metacpan.org/release/Version-Next Package: libversion-next-perl Architecture: all -Depends: ${misc:Depends}, ${perl:Depends}, libsub-exporter-perl +Depends: ${misc:Depends}, + ${perl:Depends}, + libsub-exporter-perl Description: Perl module for simply incrementing Perl module version numbers Version::Next provides a simple, correct way to increment a Perl module version number. It does not attempt to guess what the original version number @@ -24,3 +28,4 @@ . If more complex version manipulation is necessary, you may wish to consider Perl::Version. + diff -Nru libversion-next-perl-0.002/debian/copyright libversion-next-perl-0.004/debian/copyright --- libversion-next-perl-0.002/debian/copyright 2011-01-03 04:25:52.000000000 +0000 +++ libversion-next-perl-0.004/debian/copyright 2014-03-07 20:50:29.000000000 +0000 @@ -1,16 +1,17 @@ -Format-Specification: http://svn.debian.org/wsvn/dep/web/deps/dep5.mdwn?op=file&rev=135 -Maintainer: David Golden -Source: http://search.cpan.org/dist/Version-Next/ -Name: Version-Next +Format: http://www.debian.org/doc/packaging-manuals/copyright-format/1.0/ +Upstream-Name: Version-Next +Upstream-Contact: David Golden +Source: https://metacpan.org/release/Version-Next Files: * -Copyright: 2010, David Golden +Copyright: 2014, David Golden License: Apache-2.0 Files: debian/* -Copyright: +Copyright: 2010, Tim Retout - 2011, Alessandro Ghedini + 2011, Alessandro Ghedini + 2014, Florian Schlichting License: Apache-2.0 or Artistic or GPL-1+ License: Apache-2.0 @@ -24,15 +25,15 @@ See the License for the specific language governing permissions and limitations under the License. . - On Debian GNU/Linux systems, the complete text of the Apache License, + On Debian systems, the complete text of the Apache License, Version 2.0 can be found in `/usr/share/common-licenses/Apache-2.0'. License: Artistic This program is free software; you can redistribute it and/or modify it under the terms of the Artistic License, which comes with Perl. . - On Debian GNU/Linux systems, the complete text of the Artistic License - can be found in `/usr/share/common-licenses/Artistic'. + On Debian systems, the complete text of the Artistic License can be + found in `/usr/share/common-licenses/Artistic'. License: GPL-1+ This program is free software; you can redistribute it and/or modify @@ -40,5 +41,5 @@ the Free Software Foundation; either version 1, or (at your option) any later version. . - On Debian GNU/Linux systems, the complete text of version 1 of the - General Public License can be found in `/usr/share/common-licenses/GPL-1'. + On Debian systems, the complete text of version 1 of the GNU General + Public License can be found in `/usr/share/common-licenses/GPL-1'. diff -Nru libversion-next-perl-0.002/debian/libversion-next-perl.docs libversion-next-perl-0.004/debian/libversion-next-perl.docs --- libversion-next-perl-0.002/debian/libversion-next-perl.docs 1970-01-01 00:00:00.000000000 +0000 +++ libversion-next-perl-0.004/debian/libversion-next-perl.docs 2014-03-07 20:47:23.000000000 +0000 @@ -0,0 +1 @@ +CONTRIBUTING diff -Nru libversion-next-perl-0.002/debian/watch libversion-next-perl-0.004/debian/watch --- libversion-next-perl-0.002/debian/watch 2010-12-09 12:13:11.000000000 +0000 +++ libversion-next-perl-0.004/debian/watch 2014-03-04 11:00:50.000000000 +0000 @@ -1,2 +1,2 @@ version=3 -http://search.cpan.org/dist/Version-Next/ .*/Version-Next-v?(\d[\d.-]+)\.(?:tar(?:\.gz|\.bz2)?|tgz|zip)$ +https://metacpan.org/release/Version-Next .*/Version-Next-v?(\d[\d.-]+)\.(?:tar(?:\.gz|\.bz2)?|tgz|zip)$ diff -Nru libversion-next-perl-0.002/dist.ini libversion-next-perl-0.004/dist.ini --- libversion-next-perl-0.002/dist.ini 2010-10-01 17:46:11.000000000 +0000 +++ libversion-next-perl-0.004/dist.ini 2014-03-07 11:24:07.000000000 +0000 @@ -4,5 +4,5 @@ copyright_holder = David Golden [@DAGOLDEN] -git_remote = github - +:version = 0.060 +stopwords = piecewise diff -Nru libversion-next-perl-0.002/lib/Version/Next.pm libversion-next-perl-0.004/lib/Version/Next.pm --- libversion-next-perl-0.002/lib/Version/Next.pm 2010-10-01 17:46:11.000000000 +0000 +++ libversion-next-perl-0.004/lib/Version/Next.pm 2014-03-07 11:24:07.000000000 +0000 @@ -1,97 +1,115 @@ -# -# This file is part of Version-Next -# -# This software is Copyright (c) 2010 by David Golden. -# -# This is free software, licensed under: -# -# The Apache License, Version 2.0, January 2004 -# use strict; use warnings; + package Version::Next; -BEGIN { - $Version::Next::VERSION = '0.002'; -} # ABSTRACT: increment module version numbers simply and correctly +our $VERSION = '0.004'; # VERSION # Dependencies -# use version 0.81 (); # XXX not out yet +use version 0.81 (); use Carp (); # Exporting -use Sub::Exporter 0 ( -setup => { exports => [ 'next_version' ] } ); - -sub next_version { - my $version = shift; - return 0 unless defined $version; +use Sub::Exporter 0 ( -setup => { exports => ['next_version'] } ); - # XXX when next version.pm comes out, use version::is_lax - Carp::croak( "Doesn't look like a version number: '$version'" ) - unless $version =~ m{\Av?[0-9._]+\z}; - - my $new_ver; - my $num_dots =()= $version =~ /(\.)/g; - my $has_v = $version =~ /^v/; - my $is_alpha = $version =~ /\A[^_]+_\d+\z/; - - if ( $has_v || $num_dots > 1 ) { # vstring - $version =~ s{^v}{} if $has_v; - my @parts = split /\./, $version; - if ( $is_alpha ) { # vstring with alpha - push @parts, split /_/, pop @parts; +# lax versions are too lax +sub _cleanup { + my $version = shift; + + # treat 'undef' as 0 + if ( $version eq 'undef' ) { + return "0"; } - my @new_ver; - while ( @parts ) { - my $p = pop @parts; - if ( $p < 999 || ! @parts ) { - unshift @new_ver, $p+1; - last; - } - else { - unshift @new_ver, 0; - } + + # fix leading dots + if ( $version =~ /^\./ ) { + my $num_dots =()= $version =~ /(\.)/g; + return $num_dots > 1 ? version->parse($version)->normal : "0$version"; } - $new_ver = $has_v ? 'v' : ''; - $new_ver .= join( ".", map { 0+$_ } @parts, @new_ver ); - if ( $is_alpha ) { - $new_ver =~ s{\A(.*)\.(\d+)}{$1_$2}; + + # fix trailing dots + if ( $version =~ /\.$/ ) { + # is_lax already prevents dotted-decimal with trailing dot + return "${version}0"; } - } - else { # decimal fraction - my $alpha_neg_offset; - if ( $is_alpha ) { - $alpha_neg_offset = index( $version, "_" ) +1 - length( $version ); - $version =~ s{_}{}; + + # otherwise, it should be fine + return $version; +} + +sub next_version { + my $version = shift; + return "0" unless defined $version; + + Carp::croak("Doesn't look like a version number: '$version'") + unless version::is_lax($version); + + $version = _cleanup($version); + + my $new_ver; + my $num_dots =()= $version =~ /(\.)/g; + my $has_v = $version =~ /^v/; + my $is_alpha = $version =~ /\A[^_]+_\d+\z/; + + if ( $has_v || $num_dots > 1 ) { # vstring + $version =~ s{^v}{} if $has_v; + my @parts = split /\./, $version; + if ($is_alpha) { # vstring with alpha + push @parts, split /_/, pop @parts; + } + my @new_ver; + while (@parts) { + my $p = pop @parts; + if ( $p < 999 || !@parts ) { + unshift @new_ver, $p + 1; + last; + } + else { + unshift @new_ver, 0; + } + } + $new_ver = $has_v ? 'v' : ''; + $new_ver .= join( ".", map { 0+ $_ } @parts, @new_ver ); + if ($is_alpha) { + $new_ver =~ s{\A(.*)\.(\d+)}{$1_$2}; + } } - my ($fraction) = $version =~ m{\.(\d+)$}; - my $n = defined $fraction ? length($fraction) : 0; - $new_ver = sprintf("%.${n}f",$version + (10**-$n)); - if ( $is_alpha ) { - substr($new_ver, $alpha_neg_offset, 0, "_"); + else { # decimal fraction + my $alpha_neg_offset; + if ($is_alpha) { + $alpha_neg_offset = index( $version, "_" ) + 1 - length($version); + $version =~ s{_}{}; + } + my ($fraction) = $version =~ m{\.(\d+)$}; + my $n = defined $fraction ? length($fraction) : 0; + $new_ver = sprintf( "%.${n}f", $version + ( 10**-$n ) ); + if ($is_alpha) { + substr( $new_ver, $alpha_neg_offset, 0, "_" ); + } } - } - return $new_ver; + return $new_ver; } 1; - +__END__ =pod +=encoding UTF-8 + =head1 NAME Version::Next - increment module version numbers simply and correctly =head1 VERSION -version 0.002 +version 0.004 =head1 SYNOPSIS - use Version::Next; + use Version::Next qw/next_version/; my $new_version = next_version( $old_version ); @@ -116,8 +134,11 @@ my $new_version = next_version( $old_version ); Given a string, this function make the smallest logical increment and returns -it. The input string is very minimally checked that it resembles a version -number. Given C<<< undef >>>, the function returns C<<< 0 >>>. +it. The input string must be a "lax" version numbers as defined by the +L module. The literal string "undef" is treated as "0" and incremented +to "1". Leading or trailing periods have a "0" prepended or appended as +appropriate before the version is incremented. For legacy reasons, given no +argument, the function returns "0". Decimal versions are incremented like an odometer, preserving the original number of decimal places. If an underscore is present (indicating an "alpha" @@ -150,20 +171,39 @@ =back +=for :stopwords cpan testmatrix url annocpan anno bugtracker rt cpants kwalitee diff irc mailto metadata placeholders metacpan + +=head1 SUPPORT + +=head2 Bugs / Feature Requests + +Please report any bugs or feature requests through the issue tracker +at L. +You will be notified automatically of any progress on your issue. + +=head2 Source Code + +This is open source software. The code repository is available for +public review and contribution under the terms of the license. + +L + + git clone https://github.com/dagolden/Version-Next.git + =head1 AUTHOR David Golden +=head1 CONTRIBUTOR + +Grzegorz Rożniecki + =head1 COPYRIGHT AND LICENSE -This software is Copyright (c) 2010 by David Golden. +This software is Copyright (c) 2014 by David Golden. This is free software, licensed under: The Apache License, Version 2.0, January 2004 =cut - - -__END__ - diff -Nru libversion-next-perl-0.002/LICENSE libversion-next-perl-0.004/LICENSE --- libversion-next-perl-0.002/LICENSE 2010-10-01 17:46:11.000000000 +0000 +++ libversion-next-perl-0.004/LICENSE 2014-03-07 11:24:07.000000000 +0000 @@ -1,4 +1,4 @@ -This software is Copyright (c) 2010 by David Golden. +This software is Copyright (c) 2014 by David Golden. This is free software, licensed under: diff -Nru libversion-next-perl-0.002/Makefile.PL libversion-next-perl-0.004/Makefile.PL --- libversion-next-perl-0.002/Makefile.PL 2010-10-01 17:46:11.000000000 +0000 +++ libversion-next-perl-0.004/Makefile.PL 2014-03-07 11:24:07.000000000 +0000 @@ -1,51 +1,64 @@ +# This file was automatically generated by Dist::Zilla::Plugin::MakeMaker v5.013. use strict; use warnings; - BEGIN { require 5.006; } +use 5.006; -use ExtUtils::MakeMaker 6.31; +use ExtUtils::MakeMaker 6.17; my %WriteMakefileArgs = ( - 'ABSTRACT' => 'increment module version numbers simply and correctly', - 'AUTHOR' => 'David Golden ', - 'BUILD_REQUIRES' => { - 'File::Find' => '0', - 'File::Temp' => '0', - 'Test::Exception' => '0.29', - 'Test::More' => '0.88' + "ABSTRACT" => "increment module version numbers simply and correctly", + "AUTHOR" => "David Golden ", + "BUILD_REQUIRES" => {}, + "CONFIGURE_REQUIRES" => { + "ExtUtils::MakeMaker" => "6.17" }, - 'CONFIGURE_REQUIRES' => { - 'ExtUtils::MakeMaker' => '6.31' + "DISTNAME" => "Version-Next", + "EXE_FILES" => [], + "LICENSE" => "apache", + "NAME" => "Version::Next", + "PREREQ_PM" => { + "Carp" => 0, + "Sub::Exporter" => 0, + "strict" => 0, + "version" => "0.81", + "warnings" => 0 }, - 'DISTNAME' => 'Version-Next', - 'EXE_FILES' => [], - 'LICENSE' => 'apache', - 'NAME' => 'Version::Next', - 'PREREQ_PM' => { - 'Carp' => '0', - 'Sub::Exporter' => '0' + "TEST_REQUIRES" => { + "ExtUtils::MakeMaker" => 0, + "File::Spec::Functions" => 0, + "List::Util" => 0, + "Test::Exception" => "0.29", + "Test::More" => "0.88" }, - 'VERSION' => '0.002', - 'test' => { - 'TESTS' => 't/*.t' + "VERSION" => "0.004", + "test" => { + "TESTS" => "t/*.t" } ); -unless ( eval { ExtUtils::MakeMaker->VERSION(6.56) } ) { - my $br = delete $WriteMakefileArgs{BUILD_REQUIRES}; - my $pp = $WriteMakefileArgs{PREREQ_PM}; - for my $mod ( keys %$br ) { - if ( exists $pp->{$mod} ) { - $pp->{$mod} = $br->{$mod} if $br->{$mod} > $pp->{$mod}; - } - else { - $pp->{$mod} = $br->{$mod}; - } - } +my %FallbackPrereqs = ( + "Carp" => 0, + "ExtUtils::MakeMaker" => 0, + "File::Spec::Functions" => 0, + "List::Util" => 0, + "Sub::Exporter" => 0, + "Test::Exception" => "0.29", + "Test::More" => "0.88", + "strict" => 0, + "version" => "0.81", + "warnings" => 0 +); + + +unless ( eval { ExtUtils::MakeMaker->VERSION(6.63_03) } ) { + delete $WriteMakefileArgs{TEST_REQUIRES}; + delete $WriteMakefileArgs{BUILD_REQUIRES}; + $WriteMakefileArgs{PREREQ_PM} = \%FallbackPrereqs; } delete $WriteMakefileArgs{CONFIGURE_REQUIRES} diff -Nru libversion-next-perl-0.002/MANIFEST libversion-next-perl-0.004/MANIFEST --- libversion-next-perl-0.002/MANIFEST 2010-10-01 17:46:11.000000000 +0000 +++ libversion-next-perl-0.004/MANIFEST 2014-03-07 11:24:07.000000000 +0000 @@ -1,3 +1,5 @@ +# This file was automatically generated by Dist::Zilla::Plugin::Manifest v5.013. +CONTRIBUTING Changes LICENSE MANIFEST @@ -5,11 +7,19 @@ META.yml Makefile.PL README +cpanfile dist.ini lib/Version/Next.pm -t/00-compile.t +perlcritic.rc +t/00-report-prereqs.t t/version-next.t +tidyall.ini +xt/author/00-compile.t +xt/author/critic.t +xt/author/pod-spell.t xt/release/distmeta.t +xt/release/minimum-version.t xt/release/pod-coverage.t xt/release/pod-syntax.t xt/release/portability.t +xt/release/test-version.t diff -Nru libversion-next-perl-0.002/META.json libversion-next-perl-0.004/META.json --- libversion-next-perl-0.002/META.json 2010-10-01 17:46:11.000000000 +0000 +++ libversion-next-perl-0.004/META.json 2014-03-07 11:24:07.000000000 +0000 @@ -4,12 +4,12 @@ "David Golden " ], "dynamic_config" : 0, - "generated_by" : "Dist::Zilla version 4.101612, CPAN::Meta::Converter version 2.102400", + "generated_by" : "Dist::Zilla version 5.013, CPAN::Meta::Converter version 2.140630", "license" : [ "apache_2_0" ], "meta-spec" : { - "url" : "http://search.cpan.org/perldoc?CPAN::Meta::Spec", + "url" : "https://metacpan.org/pod/CPAN::Meta::Spec", "version" : "2" }, "name" : "Version-Next", @@ -19,25 +19,51 @@ "xt", "examples", "corpus" + ], + "package" : [ + "DB" ] }, "prereqs" : { "configure" : { "requires" : { - "ExtUtils::MakeMaker" : "6.31" + "ExtUtils::MakeMaker" : "6.17" + } + }, + "develop" : { + "requires" : { + "Dist::Zilla" : "5.013", + "Dist::Zilla::PluginBundle::DAGOLDEN" : "0.060", + "File::Spec" : "0", + "File::Temp" : "0", + "IO::Handle" : "0", + "IPC::Open3" : "0", + "Pod::Coverage::TrustPod" : "0", + "Test::CPAN::Meta" : "0", + "Test::More" : "0", + "Test::Pod" : "1.41", + "Test::Pod::Coverage" : "1.08" } }, "runtime" : { "requires" : { - "Carp" : 0, - "Sub::Exporter" : 0, - "perl" : "5.006" + "Carp" : "0", + "Sub::Exporter" : "0", + "perl" : "5.006", + "strict" : "0", + "version" : "0.81", + "warnings" : "0" } }, "test" : { + "recommends" : { + "CPAN::Meta" : "0", + "CPAN::Meta::Requirements" : "2.120900" + }, "requires" : { - "File::Find" : 0, - "File::Temp" : 0, + "ExtUtils::MakeMaker" : "0", + "File::Spec::Functions" : "0", + "List::Util" : "0", "Test::Exception" : "0.29", "Test::More" : "0.88" } @@ -46,15 +72,25 @@ "provides" : { "Version::Next" : { "file" : "lib/Version/Next.pm", - "version" : "0.002" + "version" : "0.004" } }, "release_status" : "stable", "resources" : { + "bugtracker" : { + "web" : "https://github.com/dagolden/Version-Next/issues" + }, + "homepage" : "https://github.com/dagolden/Version-Next", "repository" : { - "url" : "http://github.com/dagolden/version-next" + "type" : "git", + "url" : "https://github.com/dagolden/Version-Next.git", + "web" : "https://github.com/dagolden/Version-Next" } }, - "version" : "0.002" + "version" : "0.004", + "x_authority" : "cpan:DAGOLDEN", + "x_contributors" : [ + "Grzegorz Rożniecki " + ] } diff -Nru libversion-next-perl-0.002/META.yml libversion-next-perl-0.004/META.yml --- libversion-next-perl-0.002/META.yml 2010-10-01 17:46:11.000000000 +0000 +++ libversion-next-perl-0.004/META.yml 2014-03-07 11:24:07.000000000 +0000 @@ -3,18 +3,19 @@ author: - 'David Golden ' build_requires: - File::Find: 0 - File::Temp: 0 - Test::Exception: 0.29 - Test::More: 0.88 + ExtUtils::MakeMaker: '0' + File::Spec::Functions: '0' + List::Util: '0' + Test::Exception: '0.29' + Test::More: '0.88' configure_requires: - ExtUtils::MakeMaker: 6.31 + ExtUtils::MakeMaker: '6.17' dynamic_config: 0 -generated_by: 'Dist::Zilla version 4.101612, CPAN::Meta::Converter version 2.102400' +generated_by: 'Dist::Zilla version 5.013, CPAN::Meta::Converter version 2.140630' license: apache meta-spec: url: http://module-build.sourceforge.net/META-spec-v1.4.html - version: 1.4 + version: '1.4' name: Version-Next no_index: directory: @@ -22,14 +23,24 @@ - xt - examples - corpus + package: + - DB provides: Version::Next: file: lib/Version/Next.pm - version: 0.002 + version: '0.004' requires: - Carp: 0 - Sub::Exporter: 0 - perl: 5.006 + Carp: '0' + Sub::Exporter: '0' + perl: '5.006' + strict: '0' + version: '0.81' + warnings: '0' resources: - repository: http://github.com/dagolden/version-next -version: 0.002 + bugtracker: https://github.com/dagolden/Version-Next/issues + homepage: https://github.com/dagolden/Version-Next + repository: https://github.com/dagolden/Version-Next.git +version: '0.004' +x_authority: cpan:DAGOLDEN +x_contributors: + - 'Grzegorz Rożniecki ' diff -Nru libversion-next-perl-0.002/perlcritic.rc libversion-next-perl-0.004/perlcritic.rc --- libversion-next-perl-0.002/perlcritic.rc 1970-01-01 00:00:00.000000000 +0000 +++ libversion-next-perl-0.004/perlcritic.rc 2014-03-07 11:24:07.000000000 +0000 @@ -0,0 +1,26 @@ +severity = 5 +verbose = 8 + +[Variables::ProhibitPunctuationVars] +allow = $@ $! + +[TestingAndDebugging::ProhibitNoStrict] +allow = refs + +[Variables::ProhibitEvilVariables] +variables = $DB::single + +# Turn these off +[-BuiltinFunctions::ProhibitStringyEval] +[-ControlStructures::ProhibitPostfixControls] +[-ControlStructures::ProhibitUnlessBlocks] +[-Documentation::RequirePodSections] +[-InputOutput::ProhibitInteractiveTest] +[-References::ProhibitDoubleSigils] +[-RegularExpressions::RequireExtendedFormatting] +[-InputOutput::ProhibitTwoArgOpen] +[-Modules::ProhibitEvilModules] + +# Turn this on +[Lax::ProhibitStringyEval::ExceptForRequire] + diff -Nru libversion-next-perl-0.002/README libversion-next-perl-0.004/README --- libversion-next-perl-0.002/README 2010-10-01 17:46:11.000000000 +0000 +++ libversion-next-perl-0.004/README 2014-03-07 11:24:07.000000000 +0000 @@ -2,10 +2,10 @@ Version::Next - increment module version numbers simply and correctly VERSION - version 0.002 + version 0.004 SYNOPSIS - use Version::Next; + use Version::Next qw/next_version/; my $new_version = next_version( $old_version ); @@ -27,8 +27,11 @@ my $new_version = next_version( $old_version ); Given a string, this function make the smallest logical increment and - returns it. The input string is very minimally checked that it resembles - a version number. Given "undef", the function returns 0. + returns it. The input string must be a "lax" version numbers as defined + by the version module. The literal string "undef" is treated as "0" and + incremented to "1". Leading or trailing periods have a "0" prepended or + appended as appropriate before the version is incremented. For legacy + reasons, given no argument, the function returns "0". Decimal versions are incremented like an odometer, preserving the original number of decimal places. If an underscore is present @@ -55,11 +58,28 @@ SEE ALSO * Perl::Version +SUPPORT + Bugs / Feature Requests + Please report any bugs or feature requests through the issue tracker at + . You will be notified + automatically of any progress on your issue. + + Source Code + This is open source software. The code repository is available for + public review and contribution under the terms of the license. + + + + git clone https://github.com/dagolden/Version-Next.git + AUTHOR David Golden +CONTRIBUTOR + Grzegorz Rożniecki + COPYRIGHT AND LICENSE - This software is Copyright (c) 2010 by David Golden. + This software is Copyright (c) 2014 by David Golden. This is free software, licensed under: diff -Nru libversion-next-perl-0.002/t/00-compile.t libversion-next-perl-0.004/t/00-compile.t --- libversion-next-perl-0.002/t/00-compile.t 2010-10-01 17:46:11.000000000 +0000 +++ libversion-next-perl-0.004/t/00-compile.t 1970-01-01 00:00:00.000000000 +0000 @@ -1,54 +0,0 @@ -#!perl -# -# This file is part of Version-Next -# -# This software is Copyright (c) 2010 by David Golden. -# -# This is free software, licensed under: -# -# The Apache License, Version 2.0, January 2004 -# - -use strict; -use warnings; - -use Test::More; -use File::Find; -use File::Temp qw{ tempdir }; - -my @modules; -find( - sub { - return if $File::Find::name !~ /\.pm\z/; - my $found = $File::Find::name; - $found =~ s{^lib/}{}; - $found =~ s{[/\\]}{::}g; - $found =~ s/\.pm$//; - # nothing to skip - push @modules, $found; - }, - 'lib', -); - -my @scripts = glob "bin/*"; - -my $plan = scalar(@modules) + scalar(@scripts); -$plan ? (plan tests => $plan) : (plan skip_all => "no tests to run"); - -{ - # fake home for cpan-testers - local $ENV{HOME} = tempdir( CLEANUP => 1 ); - - like( qx{ $^X -Ilib -e "require $_; print '$_ ok'" }, qr/^\s*$_ ok/s, "$_ loaded ok" ) - for sort @modules; - - SKIP: { - eval "use Test::Script 1.05; 1;"; - skip "Test::Script needed to test script compilation", scalar(@scripts) if $@; - foreach my $file ( @scripts ) { - my $script = $file; - $script =~ s!.*/!!; - script_compiles( $file, "$script script compiles" ); - } - } -} diff -Nru libversion-next-perl-0.002/t/00-report-prereqs.t libversion-next-perl-0.004/t/00-report-prereqs.t --- libversion-next-perl-0.002/t/00-report-prereqs.t 1970-01-01 00:00:00.000000000 +0000 +++ libversion-next-perl-0.004/t/00-report-prereqs.t 2014-03-07 11:24:07.000000000 +0000 @@ -0,0 +1,181 @@ +#!perl + +use strict; +use warnings; + +# This test was generated by Dist::Zilla::Plugin::Test::ReportPrereqs 0.013 + +use Test::More tests => 1; + +use ExtUtils::MakeMaker; +use File::Spec::Functions; +use List::Util qw/max/; +use version; + +# hide optional CPAN::Meta modules from prereq scanner +# and check if they are available +my $cpan_meta = "CPAN::Meta"; +my $cpan_meta_req = "CPAN::Meta::Requirements"; +my $HAS_CPAN_META = eval "require $cpan_meta"; ## no critic +my $HAS_CPAN_META_REQ = eval "require $cpan_meta_req; $cpan_meta_req->VERSION('2.120900')"; + +# Verify requirements? +my $DO_VERIFY_PREREQS = 1; + +sub _merge_requires { + my ($collector, $prereqs) = @_; + for my $phase ( qw/configure build test runtime develop/ ) { + next unless exists $prereqs->{$phase}; + if ( my $req = $prereqs->{$phase}{'requires'} ) { + my $cmr = CPAN::Meta::Requirements->from_string_hash( $req ); + $collector->add_requirements( $cmr ); + } + } +} + +my %include = map {; $_ => 1 } qw( + +); + +my %exclude = map {; $_ => 1 } qw( + +); + +# Add static prereqs to the included modules list +my $static_prereqs = do { my $x = { + 'configure' => { + 'requires' => { + 'ExtUtils::MakeMaker' => '6.17' + } + }, + 'develop' => { + 'requires' => { + 'Dist::Zilla' => '5.013', + 'Dist::Zilla::PluginBundle::DAGOLDEN' => '0.060', + 'File::Spec' => '0', + 'File::Temp' => '0', + 'IO::Handle' => '0', + 'IPC::Open3' => '0', + 'Pod::Coverage::TrustPod' => '0', + 'Test::CPAN::Meta' => '0', + 'Test::More' => '0', + 'Test::Pod' => '1.41', + 'Test::Pod::Coverage' => '1.08' + } + }, + 'runtime' => { + 'requires' => { + 'Carp' => '0', + 'Sub::Exporter' => '0', + 'perl' => '5.006', + 'strict' => '0', + 'version' => '0.81', + 'warnings' => '0' + } + }, + 'test' => { + 'recommends' => { + 'CPAN::Meta' => '0', + 'CPAN::Meta::Requirements' => '2.120900' + }, + 'requires' => { + 'ExtUtils::MakeMaker' => '0', + 'File::Spec::Functions' => '0', + 'List::Util' => '0', + 'Test::Exception' => '0.29', + 'Test::More' => '0.88' + } + } + }; + $x; + }; + +delete $static_prereqs->{develop} if not $ENV{AUTHOR_TESTING}; +$include{$_} = 1 for map { keys %$_ } map { values %$_ } values %$static_prereqs; + +# Merge requirements for major phases (if we can) +my $all_requires; +if ( $DO_VERIFY_PREREQS && $HAS_CPAN_META_REQ ) { + $all_requires = $cpan_meta_req->new; + _merge_requires($all_requires, $static_prereqs); +} + + +# Add dynamic prereqs to the included modules list (if we can) +my ($source) = grep { -f } 'MYMETA.json', 'MYMETA.yml'; +if ( $source && $HAS_CPAN_META ) { + if ( my $meta = eval { CPAN::Meta->load_file($source) } ) { + my $dynamic_prereqs = $meta->prereqs; + delete $dynamic_prereqs->{develop} if not $ENV{AUTHOR_TESTING}; + $include{$_} = 1 for map { keys %$_ } map { values %$_ } values %$dynamic_prereqs; + + if ( $DO_VERIFY_PREREQS && $HAS_CPAN_META_REQ ) { + _merge_requires($all_requires, $dynamic_prereqs); + } + } +} +else { + $source = 'static metadata'; +} + +my @modules = sort grep { ! $exclude{$_} } keys %include; +my @reports = [qw/Version Module/]; +my @dep_errors; +my $req_hash = defined($all_requires) ? $all_requires->as_string_hash : {}; + +for my $mod ( @modules ) { + next if $mod eq 'perl'; + my $file = $mod; + $file =~ s{::}{/}g; + $file .= ".pm"; + my ($prefix) = grep { -e catfile($_, $file) } @INC; + if ( $prefix ) { + my $ver = MM->parse_version( catfile($prefix, $file) ); + $ver = "undef" unless defined $ver; # Newer MM should do this anyway + push @reports, [$ver, $mod]; + + if ( $DO_VERIFY_PREREQS && $all_requires ) { + my $req = $req_hash->{$mod}; + if ( defined $req && length $req ) { + if ( ! defined eval { version->parse($ver) } ) { + push @dep_errors, "$mod version '$ver' cannot be parsed (version '$req' required)"; + } + elsif ( ! $all_requires->accepts_module( $mod => $ver ) ) { + push @dep_errors, "$mod version '$ver' is not in required range '$req'"; + } + } + } + + } + else { + push @reports, ["missing", $mod]; + + if ( $DO_VERIFY_PREREQS && $all_requires ) { + my $req = $req_hash->{$mod}; + if ( defined $req && length $req ) { + push @dep_errors, "$mod is not installed (version '$req' required)"; + } + } + } +} + +if ( @reports ) { + my $vl = max map { length $_->[0] } @reports; + my $ml = max map { length $_->[1] } @reports; + splice @reports, 1, 0, ["-" x $vl, "-" x $ml]; + diag "\nVersions for all modules listed in $source (including optional ones):\n", + map {sprintf(" %*s %*s\n",$vl,$_->[0],-$ml,$_->[1])} @reports; +} + +if ( @dep_errors ) { + diag join("\n", + "\n*** WARNING WARNING WARNING WARNING WARNING WARNING WARNING WARNING ***\n", + "The following REQUIRED prerequisites were not satisfied:\n", + @dep_errors, + "\n" + ); +} + +pass; + +# vim: ts=4 sts=4 sw=4 et: diff -Nru libversion-next-perl-0.002/t/version-next.t libversion-next-perl-0.004/t/version-next.t --- libversion-next-perl-0.002/t/version-next.t 2010-10-01 17:46:11.000000000 +0000 +++ libversion-next-perl-0.004/t/version-next.t 2014-03-07 11:24:07.000000000 +0000 @@ -1,25 +1,43 @@ use strict; use warnings; -use Test::More 0.88; END { done_testing } +use Test::More 0.88; +END { done_testing } use Test::Exception 0.29; # Work around buffering that can show diags out of order Test::More->builder->failure_output(*STDOUT) if $ENV{HARNESS_VERBOSE}; my ($obj); -require_ok( 'Version::Next' ); +require_ok('Version::Next'); can_ok( 'Version::Next', 'next_version' ); eval "use Version::Next 'next_version'"; can_ok( 'main', 'next_version' ); -is( next_version(1), 2, "1 + 1 == 2"); -throws_ok { next_version('abc') } qr/Doesn't look like a version number: 'abc' at/, "throws error on bad input"; +is( next_version(1), 2, "1 + 1 == 2" ); -for my $case ( ) { - chomp $case; - next if $case =~ m{\A(?:#|\s*\z)}; - my ($input, $output) = split ' ', $case; - is( next_version($input), $output, "$input -> $output" ); +my @errors = qw( + abc + 1_00_01 + 1.00_ + 1..0 + v1_ + v.2 + .1. + .1.2. + 1_1. +); + +for my $error_case (@errors) { + throws_ok { next_version($error_case) } + qr/Doesn't look like a version number: '$error_case' at/, + "throws error on bad input ($error_case)"; +} + +for my $case () { + chomp $case; + next if $case =~ m{\A(?:#|\s*\z)}; + my ( $input, $output ) = split ' ', $case; + is( next_version($input), $output, "$input -> $output" ); } __DATA__ @@ -147,3 +165,12 @@ v0.0_099 v0.0_100 v0.0_0999 v0.1_0 v0.0_01000 v0.1_0 + +# weird lax stuff + +undef 1 +.1 0.2 +.1_1 0.1_2 +1. 1.1 +.1.2 v0.1.3 +.1.2_3 v0.1.2_4 diff -Nru libversion-next-perl-0.002/tidyall.ini libversion-next-perl-0.004/tidyall.ini --- libversion-next-perl-0.002/tidyall.ini 1970-01-01 00:00:00.000000000 +0000 +++ libversion-next-perl-0.004/tidyall.ini 2014-03-07 11:24:07.000000000 +0000 @@ -0,0 +1,5 @@ +; Install Code::TidyAll +; run "tidyall -a" to tidy all files +; run "tidyall -g" to tidy only files modified from git +[PerlTidy] +select = {lib,t}/**/*.{pl,pm,t} diff -Nru libversion-next-perl-0.002/xt/author/00-compile.t libversion-next-perl-0.004/xt/author/00-compile.t --- libversion-next-perl-0.002/xt/author/00-compile.t 1970-01-01 00:00:00.000000000 +0000 +++ libversion-next-perl-0.004/xt/author/00-compile.t 2014-03-07 11:24:07.000000000 +0000 @@ -0,0 +1,53 @@ +use 5.006; +use strict; +use warnings; + +# this test was generated with Dist::Zilla::Plugin::Test::Compile 2.039 + +use Test::More tests => 1 + ($ENV{AUTHOR_TESTING} ? 1 : 0); + + + +my @module_files = ( + 'Version/Next.pm' +); + + + +# fake home for cpan-testers +use File::Temp; +local $ENV{HOME} = File::Temp::tempdir( CLEANUP => 1 ); + + +my $inc_switch = -d 'blib' ? '-Mblib' : '-Ilib'; + +use File::Spec; +use IPC::Open3; +use IO::Handle; + +open my $stdin, '<', File::Spec->devnull or die "can't open devnull: $!"; + +my @warnings; +for my $lib (@module_files) +{ + # see L + my $stderr = IO::Handle->new; + + my $pid = open3($stdin, '>&STDERR', $stderr, $^X, $inc_switch, '-e', "require q[$lib]"); + binmode $stderr, ':crlf' if $^O eq 'MSWin32'; + my @_warnings = <$stderr>; + waitpid($pid, 0); + is($?, 0, "$lib loaded ok"); + + if (@_warnings) + { + warn @_warnings; + push @warnings, @_warnings; + } +} + + + +is(scalar(@warnings), 0, 'no warnings found') if $ENV{AUTHOR_TESTING}; + + diff -Nru libversion-next-perl-0.002/xt/author/critic.t libversion-next-perl-0.004/xt/author/critic.t --- libversion-next-perl-0.002/xt/author/critic.t 1970-01-01 00:00:00.000000000 +0000 +++ libversion-next-perl-0.004/xt/author/critic.t 2014-03-07 11:24:07.000000000 +0000 @@ -0,0 +1,12 @@ +#!perl + +use strict; +use warnings; + +use Test::More; +use English qw(-no_match_vars); + +eval "use Test::Perl::Critic"; +plan skip_all => 'Test::Perl::Critic required to criticise code' if $@; +Test::Perl::Critic->import( -profile => "perlcritic.rc" ) if -e "perlcritic.rc"; +all_critic_ok(); diff -Nru libversion-next-perl-0.002/xt/author/pod-spell.t libversion-next-perl-0.004/xt/author/pod-spell.t --- libversion-next-perl-0.002/xt/author/pod-spell.t 1970-01-01 00:00:00.000000000 +0000 +++ libversion-next-perl-0.004/xt/author/pod-spell.t 2014-03-07 11:24:07.000000000 +0000 @@ -0,0 +1,22 @@ +use strict; +use warnings; +use Test::More; + +# generated by Dist::Zilla::Plugin::Test::PodSpelling 2.006007 +use Test::Spelling 0.12; +use Pod::Wordlist; + + +add_stopwords(); +all_pod_files_spelling_ok( qw( bin lib ) ); +__DATA__ +piecewise +David +Golden +dagolden +Grzegorz +Rożniecki +xaerxess +lib +Version +Next diff -Nru libversion-next-perl-0.002/xt/release/distmeta.t libversion-next-perl-0.004/xt/release/distmeta.t --- libversion-next-perl-0.002/xt/release/distmeta.t 2010-10-01 17:46:11.000000000 +0000 +++ libversion-next-perl-0.004/xt/release/distmeta.t 2014-03-07 11:24:07.000000000 +0000 @@ -1,16 +1,6 @@ #!perl -# -# This file is part of Version-Next -# -# This software is Copyright (c) 2010 by David Golden. -# -# This is free software, licensed under: -# -# The Apache License, Version 2.0, January 2004 -# +# This file was automatically generated by Dist::Zilla::Plugin::MetaTests. -use Test::More; +use Test::CPAN::Meta; -eval "use Test::CPAN::Meta"; -plan skip_all => "Test::CPAN::Meta required for testing META.yml" if $@; meta_yaml_ok(); diff -Nru libversion-next-perl-0.002/xt/release/minimum-version.t libversion-next-perl-0.004/xt/release/minimum-version.t --- libversion-next-perl-0.002/xt/release/minimum-version.t 1970-01-01 00:00:00.000000000 +0000 +++ libversion-next-perl-0.004/xt/release/minimum-version.t 2014-03-07 11:24:07.000000000 +0000 @@ -0,0 +1,8 @@ +#!perl + +use Test::More; + +eval "use Test::MinimumVersion"; +plan skip_all => "Test::MinimumVersion required for testing minimum versions" + if $@; +all_minimum_version_ok( qq{5.010} ); diff -Nru libversion-next-perl-0.002/xt/release/pod-coverage.t libversion-next-perl-0.004/xt/release/pod-coverage.t --- libversion-next-perl-0.002/xt/release/pod-coverage.t 2010-10-01 17:46:11.000000000 +0000 +++ libversion-next-perl-0.004/xt/release/pod-coverage.t 2014-03-07 11:24:07.000000000 +0000 @@ -1,22 +1,7 @@ #!perl -# -# This file is part of Version-Next -# -# This software is Copyright (c) 2010 by David Golden. -# -# This is free software, licensed under: -# -# The Apache License, Version 2.0, January 2004 -# +# This file was automatically generated by Dist::Zilla::Plugin::PodCoverageTests. -use Test::More; - -eval "use Test::Pod::Coverage 1.08"; -plan skip_all => "Test::Pod::Coverage 1.08 required for testing POD coverage" - if $@; - -eval "use Pod::Coverage::TrustPod"; -plan skip_all => "Pod::Coverage::TrustPod required for testing POD coverage" - if $@; +use Test::Pod::Coverage 1.08; +use Pod::Coverage::TrustPod; all_pod_coverage_ok({ coverage_class => 'Pod::Coverage::TrustPod' }); diff -Nru libversion-next-perl-0.002/xt/release/pod-syntax.t libversion-next-perl-0.004/xt/release/pod-syntax.t --- libversion-next-perl-0.002/xt/release/pod-syntax.t 2010-10-01 17:46:11.000000000 +0000 +++ libversion-next-perl-0.004/xt/release/pod-syntax.t 2014-03-07 11:24:07.000000000 +0000 @@ -1,16 +1,6 @@ #!perl -# -# This file is part of Version-Next -# -# This software is Copyright (c) 2010 by David Golden. -# -# This is free software, licensed under: -# -# The Apache License, Version 2.0, January 2004 -# +# This file was automatically generated by Dist::Zilla::Plugin::PodSyntaxTests. use Test::More; - -eval "use Test::Pod 1.41"; -plan skip_all => "Test::Pod 1.41 required for testing POD" if $@; +use Test::Pod 1.41; all_pod_files_ok(); diff -Nru libversion-next-perl-0.002/xt/release/portability.t libversion-next-perl-0.004/xt/release/portability.t --- libversion-next-perl-0.002/xt/release/portability.t 2010-10-01 17:46:11.000000000 +0000 +++ libversion-next-perl-0.004/xt/release/portability.t 2014-03-07 11:24:07.000000000 +0000 @@ -1,17 +1,12 @@ #!perl -# -# This file is part of Version-Next -# -# This software is Copyright (c) 2010 by David Golden. -# -# This is free software, licensed under: -# -# The Apache License, Version 2.0, January 2004 -# + +use strict; +use warnings; use Test::More; -eval "use Test::Portability::Files"; -plan skip_all => "Test::Portability::Files required for testing portability" - if $@; +eval 'use Test::Portability::Files'; +plan skip_all => 'Test::Portability::Files required for testing portability' + if $@; +options(test_one_dot => 0); run_tests(); diff -Nru libversion-next-perl-0.002/xt/release/test-version.t libversion-next-perl-0.004/xt/release/test-version.t --- libversion-next-perl-0.002/xt/release/test-version.t 1970-01-01 00:00:00.000000000 +0000 +++ libversion-next-perl-0.004/xt/release/test-version.t 2014-03-07 11:24:07.000000000 +0000 @@ -0,0 +1,22 @@ +use strict; +use warnings; +use Test::More; + +# generated by Dist::Zilla::Plugin::Test::Version 0.002004 +BEGIN { eval "use Test::Version; 1;" or die $@; } + +my @imports = ( 'version_all_ok' ); + +my $params = { + is_strict => 0, + has_version => 1, +}; + +push @imports, $params + if version->parse( $Test::Version::VERSION ) >= version->parse('1.002'); + + +Test::Version->import(@imports); + +version_all_ok; +done_testing;