r50773 - in /branches/upstream/libtest-consistentversion-perl: ./ current/ current/lib/ current/lib/Test/ current/t/ current/t/Sample-Bad/ current/t/Sample-Bad/lib/ current/t/Sample-Bad/lib/Sample/ current/t/Sample-Good/ current/t/Sample-Good/lib/ current/t/Sample-Good/lib/Sample/

jawnsy-guest at users.alioth.debian.org jawnsy-guest at users.alioth.debian.org
Mon Jan 11 21:13:39 UTC 2010


Author: jawnsy-guest
Date: Mon Jan 11 21:13:33 2010
New Revision: 50773

URL: http://svn.debian.org/wsvn/pkg-perl/?sc=1&rev=50773
Log:
[svn-inject] Installing original source of libtest-consistentversion-perl

Added:
    branches/upstream/libtest-consistentversion-perl/
    branches/upstream/libtest-consistentversion-perl/current/
    branches/upstream/libtest-consistentversion-perl/current/Build.PL
    branches/upstream/libtest-consistentversion-perl/current/Changes
    branches/upstream/libtest-consistentversion-perl/current/MANIFEST
    branches/upstream/libtest-consistentversion-perl/current/META.yml
    branches/upstream/libtest-consistentversion-perl/current/README
    branches/upstream/libtest-consistentversion-perl/current/lib/
    branches/upstream/libtest-consistentversion-perl/current/lib/Test/
    branches/upstream/libtest-consistentversion-perl/current/lib/Test/ConsistentVersion.pm
    branches/upstream/libtest-consistentversion-perl/current/t/
    branches/upstream/libtest-consistentversion-perl/current/t/00.load.t
    branches/upstream/libtest-consistentversion-perl/current/t/01.good.t
    branches/upstream/libtest-consistentversion-perl/current/t/02.bad.t
    branches/upstream/libtest-consistentversion-perl/current/t/Sample-Bad/
    branches/upstream/libtest-consistentversion-perl/current/t/Sample-Bad/Changes
    branches/upstream/libtest-consistentversion-perl/current/t/Sample-Bad/MANIFEST
    branches/upstream/libtest-consistentversion-perl/current/t/Sample-Bad/lib/
    branches/upstream/libtest-consistentversion-perl/current/t/Sample-Bad/lib/Sample/
    branches/upstream/libtest-consistentversion-perl/current/t/Sample-Bad/lib/Sample/Bad.pm
    branches/upstream/libtest-consistentversion-perl/current/t/Sample-Bad/lib/Sample/StillBad.pm
    branches/upstream/libtest-consistentversion-perl/current/t/Sample-Good/
    branches/upstream/libtest-consistentversion-perl/current/t/Sample-Good/Changes
    branches/upstream/libtest-consistentversion-perl/current/t/Sample-Good/MANIFEST
    branches/upstream/libtest-consistentversion-perl/current/t/Sample-Good/README
    branches/upstream/libtest-consistentversion-perl/current/t/Sample-Good/lib/
    branches/upstream/libtest-consistentversion-perl/current/t/Sample-Good/lib/Sample/
    branches/upstream/libtest-consistentversion-perl/current/t/Sample-Good/lib/Sample/Good.pm
    branches/upstream/libtest-consistentversion-perl/current/t/Sample-Good/lib/Sample/StillGood.pm
    branches/upstream/libtest-consistentversion-perl/current/t/perlcritic.t
    branches/upstream/libtest-consistentversion-perl/current/t/pod-coverage.t
    branches/upstream/libtest-consistentversion-perl/current/t/pod.t
    branches/upstream/libtest-consistentversion-perl/current/t/version.t

Added: branches/upstream/libtest-consistentversion-perl/current/Build.PL
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libtest-consistentversion-perl/current/Build.PL?rev=50773&op=file
==============================================================================
--- branches/upstream/libtest-consistentversion-perl/current/Build.PL (added)
+++ branches/upstream/libtest-consistentversion-perl/current/Build.PL Mon Jan 11 21:13:33 2010
@@ -1,0 +1,26 @@
+use strict;
+use warnings;
+use Module::Build;
+
+my $builder = Module::Build->new(
+    module_name         => 'Test::ConsistentVersion',
+    license             => 'perl',
+    dist_author         => 'Glenn Fowler <cebjyre at cpan.org>',
+    dist_version_from   => 'lib/Test/ConsistentVersion.pm',
+    requires => {
+        'Test::Builder' => 0.94,
+        'version'       => 0,
+        'autodie'       => 0,
+    },
+    recommends => {
+        'Test::Pod::Content'    => 0,
+    },
+    meta_merge => {
+        resources => {
+            repository  => 'http://github.com/cebjyre/Test-ConsistentVersion',
+        },
+    },
+    add_to_cleanup      => [ 'Test-ConsistentVersion-*' ],
+);
+
+$builder->create_build_script();

Added: branches/upstream/libtest-consistentversion-perl/current/Changes
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libtest-consistentversion-perl/current/Changes?rev=50773&op=file
==============================================================================
--- branches/upstream/libtest-consistentversion-perl/current/Changes (added)
+++ branches/upstream/libtest-consistentversion-perl/current/Changes Mon Jan 11 21:13:33 2010
@@ -1,0 +1,33 @@
+Revision history for Test-ConsistentVersion
+
+0.2.2  Fri Sep 18 2009
+       Fixed test that had a hardcoded assumption
+            of where Test::Pod::Content lives
+
+0.2.1  Thu Sep 17 2009
+       Fixed tests when Test::Pod::Content is
+            not available
+
+0.2.0  Thu Sep 17 2009
+       Improved tests
+       No longer trying to plan tests if a plan has
+            already been made
+
+0.1.0  Tue Sep 15 2009
+       Now checking README for version consistency
+
+0.0.4  Mon Sep  7 2009
+       Requiring minimum of 0.94 of Test-Simple
+            for the subtest functionality
+
+0.0.3  Sun Sep  6 2009
+       Updated MANIFEST to actually include the
+            test developed for 0.0.2
+
+0.0.2  Sun Sep  6 2009
+       Added a test, repository and
+            recommended modules metadata
+
+0.0.1  Sun Aug 30 2009
+       Initial release.
+

Added: branches/upstream/libtest-consistentversion-perl/current/MANIFEST
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libtest-consistentversion-perl/current/MANIFEST?rev=50773&op=file
==============================================================================
--- branches/upstream/libtest-consistentversion-perl/current/MANIFEST (added)
+++ branches/upstream/libtest-consistentversion-perl/current/MANIFEST Mon Jan 11 21:13:33 2010
@@ -1,0 +1,22 @@
+Build.PL
+Changes
+lib/Test/ConsistentVersion.pm
+MANIFEST
+META.yml
+README
+t/00.load.t
+t/01.good.t
+t/02.bad.t
+t/perlcritic.t
+t/pod-coverage.t
+t/pod.t
+t/Sample-Bad/Changes
+t/Sample-Bad/lib/Sample/Bad.pm
+t/Sample-Bad/lib/Sample/StillBad.pm
+t/Sample-Bad/MANIFEST
+t/Sample-Good/Changes
+t/Sample-Good/lib/Sample/Good.pm
+t/Sample-Good/lib/Sample/StillGood.pm
+t/Sample-Good/MANIFEST
+t/Sample-Good/README
+t/version.t

Added: branches/upstream/libtest-consistentversion-perl/current/META.yml
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libtest-consistentversion-perl/current/META.yml?rev=50773&op=file
==============================================================================
--- branches/upstream/libtest-consistentversion-perl/current/META.yml (added)
+++ branches/upstream/libtest-consistentversion-perl/current/META.yml Mon Jan 11 21:13:33 2010
@@ -1,0 +1,26 @@
+---
+name: Test-ConsistentVersion
+version: v0.2.2
+author:
+  - 'Glenn Fowler <cebjyre at cpan.org>'
+abstract: Ensures a CPAN distribution has consistent versioning.
+license: perl
+resources:
+  license: http://dev.perl.org/licenses/
+  repository: http://github.com/cebjyre/Test-ConsistentVersion
+requires:
+  Test::Builder: 0.94
+  autodie: 0
+  version: 0
+recommends:
+  Test::Pod::Content: 0
+configure_requires:
+  Module::Build: 0.35
+provides:
+  Test::ConsistentVersion:
+    file: lib/Test/ConsistentVersion.pm
+    version: v0.2.2
+generated_by: Module::Build version 0.35
+meta-spec:
+  url: http://module-build.sourceforge.net/META-spec-v1.4.html
+  version: 1.4

Added: branches/upstream/libtest-consistentversion-perl/current/README
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libtest-consistentversion-perl/current/README?rev=50773&op=file
==============================================================================
--- branches/upstream/libtest-consistentversion-perl/current/README (added)
+++ branches/upstream/libtest-consistentversion-perl/current/README Mon Jan 11 21:13:33 2010
@@ -1,0 +1,32 @@
+Test-ConsistentVersion version 0.2.2
+
+The purpose of this module is to make it easy for other distribution
+authors to have consistent version numbers within the modules (and
+changelog and readme) of the distribution.
+
+
+INSTALLATION
+
+To install this module, run the following commands:
+
+    perl Build.PL
+    ./Build
+    ./Build test
+    ./Build install
+
+
+DEPENDENCIES
+
+Test::Builder
+autodie
+version
+
+Optional:
+Test::Pod::Content
+
+COPYRIGHT AND LICENCE
+
+Copyright (C) 2009, Glenn Fowler
+
+This library is free software; you can redistribute it and/or modify
+it under the same terms as Perl itself.

Added: branches/upstream/libtest-consistentversion-perl/current/lib/Test/ConsistentVersion.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libtest-consistentversion-perl/current/lib/Test/ConsistentVersion.pm?rev=50773&op=file
==============================================================================
--- branches/upstream/libtest-consistentversion-perl/current/lib/Test/ConsistentVersion.pm (added)
+++ branches/upstream/libtest-consistentversion-perl/current/lib/Test/ConsistentVersion.pm Mon Jan 11 21:13:33 2010
@@ -1,0 +1,259 @@
+package Test::ConsistentVersion;
+
+use warnings;
+use autodie;
+use strict;
+use Carp;
+use Test::Builder;
+
+use version; our $VERSION = qv('0.2.2');
+
+my $TEST = Test::Builder->new;
+my %ARGS;
+
+sub check_consistent_versions {
+    %ARGS = @_;
+    
+    my @modules = _find_modules();
+    
+    my $file_count = @modules;
+    unless(@modules) {
+        $TEST->diag('No files to get version from.');
+    }
+    my $test_count = $file_count;
+    unless($ARGS{no_pod}) {
+        eval { require Test::Pod::Content; };
+        
+        if ($@) {
+            $TEST->diag('Test::Pod::Content required to test POD version consistency');
+            $ARGS{no_pod} = 1;
+        }
+        else {
+            $test_count+=$file_count
+        }
+    }
+    $test_count++ unless $ARGS{no_changelog};
+    $test_count++ unless $ARGS{no_readme};
+    $TEST->plan(tests => $test_count) unless $TEST->has_plan;
+    
+    ## no critic (eval)
+    #Find the version number
+    eval "require $modules[0]";
+    my $distro_version = $modules[0]->VERSION;
+    $TEST->diag("Distribution version: $distro_version");
+    
+    _check_module_versions($distro_version, @modules);
+    _check_pod_versions(@modules) unless $ARGS{no_pod};
+    _check_changelog($distro_version) unless $ARGS{no_changelog};
+    _check_readme($distro_version) unless $ARGS{no_readme};
+}
+
+sub _find_modules {
+    my @modules;
+    
+    if($ARGS{files}) {
+        @modules = @{$ARGS{modules}};
+    }
+    if(-e 'MANIFEST') {
+        open(my $fh, '<', 'MANIFEST');
+        @modules = map {
+            my $str = $_;
+            $str =~ s{^lib/(.*)\.pm}{$1};
+            $str =~ s(/)(::)g;
+            chomp $str;
+            $str;
+        } grep {
+            /^lib.*\.pm$/
+        } <$fh>;
+        close $fh;
+    }
+    return @modules;
+}
+
+sub _check_pod_versions {
+    my @modules = @_;
+    unless(@modules) {
+        $TEST->diag('No files to check POD of.');
+    }
+    
+    ## no critic (eval)
+    foreach my $module (@modules) {
+        eval "require $module" or $TEST->diag($@);
+        my $module_version = $module->VERSION;
+        Test::Pod::Content::pod_section_like( $module, 'VERSION', qr{(^|\s)\Q$module_version\E(\s|$)}, "$module POD version is the same as module version")
+    }
+}
+
+sub _check_module_versions {
+    my $version = shift;
+    my @modules = @_;
+    
+    ## no critic (eval)
+    foreach my $module (@modules) {
+        eval "require $module" or $TEST->diag($@);
+        $TEST->is_eq($module->VERSION, $version, "$module is the same as the distribution version");
+    }
+}
+
+sub _check_changelog {
+    my $version = shift;
+    if(-e 'Changes') {
+        open(my $fh, '<', 'Changes');
+        my $version_check = quotemeta($version);
+        
+        my $changelog = join "\n", <$fh>;
+        $TEST->like($changelog, qr{\b$version_check\b}, 'Changelog includes reference to the distribution version: ' . $version);
+        close $fh;
+    }
+    else {
+        $TEST->ok(0, 'Unable to find Changes file');
+    }
+}
+
+sub _check_readme {
+    my $version = shift;
+    if(-e 'README') {
+        open(my $fh, '<', 'README');
+        my $version_check = quotemeta($version);
+        
+        my $readme = join "\n", <$fh>;
+        $TEST->like($readme, qr{\b$version_check\b}, 'README file includes reference to the distribution version: ' . $version);
+        close $fh;
+    }
+    else {
+        $TEST->ok(0, 'Unable to find README file');
+    }
+}
+
+1; # Magic true value required at end of module
+
+__END__
+
+=head1 NAME
+
+Test::ConsistentVersion - Ensures a CPAN distribution has consistent versioning.
+
+
+=head1 VERSION
+
+This document describes Test::ConsistentVersion version 0.2.2
+
+
+=head1 SYNOPSIS
+
+[In a test file]
+
+    use Test::More;
+    
+    if ( not $ENV{TEST_AUTHOR} ) {
+        my $msg = 'Author test. Set $ENV{TEST_AUTHOR} to a true value to run.';
+        plan( skip_all => $msg );
+    }
+    
+    eval "use Test::ConsistentVersion";
+    plan skip_all => "Test::ConsistentVersion required for checking versions" if $@;
+    Test::ConsistentVersion::check_consistent_versions();
+
+
+=head1 DESCRIPTION
+
+The purpose of this module is to make it easy for other distribution
+authors to have consistent version numbers within the modules (as well
+as readme file and changelog) of the distribution.
+
+
+=head1 INTERFACE
+
+=over
+
+=item check_consistent_versions
+
+    check_consistent_versions()
+
+Checks the various versions throughout the distribution to ensure they
+are all consistent.
+
+=back
+
+
+=head1 DIAGNOSTICS
+
+Nothing so far.
+
+=head1 CONFIGURATION AND ENVIRONMENT
+
+Test::ConsistentVersion requires no configuration files or environment variables.
+
+
+=head1 DEPENDENCIES
+
+=over
+
+=item L<Test::Builder>
+
+=item L<autodie>
+
+=back
+
+
+B<Optional>
+
+=over
+
+=item L<Test::Pod::Content>
+
+For ensuring the module version matches that referenced in the POD.
+
+=back
+
+=head1 INCOMPATIBILITIES
+
+None reported.
+
+
+=head1 BUGS AND LIMITATIONS
+
+No bugs have been reported.
+
+Please report any bugs or feature requests to
+C<bug-test-consistentversion at rt.cpan.org>, or through the web interface at
+L<http://rt.cpan.org>.
+
+
+=head1 AUTHOR
+
+Glenn Fowler  C<< <cebjyre at cpan.org> >>
+
+Thanks to L<http://www.hiivesystems.com>.
+
+
+=head1 LICENCE AND COPYRIGHT
+
+Copyright (c) 2009, Glenn Fowler C<< <cebjyre at cpan.org> >>. All rights reserved.
+
+This module is free software; you can redistribute it and/or
+modify it under the same terms as Perl itself. See L<perlartistic>.
+
+
+=head1 DISCLAIMER OF WARRANTY
+
+BECAUSE THIS SOFTWARE IS LICENSED FREE OF CHARGE, THERE IS NO WARRANTY
+FOR THE SOFTWARE, TO THE EXTENT PERMITTED BY APPLICABLE LAW. EXCEPT WHEN
+OTHERWISE STATED IN WRITING THE COPYRIGHT HOLDERS AND/OR OTHER PARTIES
+PROVIDE THE SOFTWARE "AS IS" WITHOUT WARRANTY OF ANY KIND, EITHER
+EXPRESSED OR IMPLIED, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
+WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE. THE
+ENTIRE RISK AS TO THE QUALITY AND PERFORMANCE OF THE SOFTWARE IS WITH
+YOU. SHOULD THE SOFTWARE PROVE DEFECTIVE, YOU ASSUME THE COST OF ALL
+NECESSARY SERVICING, REPAIR, OR CORRECTION.
+
+IN NO EVENT UNLESS REQUIRED BY APPLICABLE LAW OR AGREED TO IN WRITING
+WILL ANY COPYRIGHT HOLDER, OR ANY OTHER PARTY WHO MAY MODIFY AND/OR
+REDISTRIBUTE THE SOFTWARE AS PERMITTED BY THE ABOVE LICENCE, BE
+LIABLE TO YOU FOR DAMAGES, INCLUDING ANY GENERAL, SPECIAL, INCIDENTAL,
+OR CONSEQUENTIAL DAMAGES ARISING OUT OF THE USE OR INABILITY TO USE
+THE SOFTWARE (INCLUDING BUT NOT LIMITED TO LOSS OF DATA OR DATA BEING
+RENDERED INACCURATE OR LOSSES SUSTAINED BY YOU OR THIRD PARTIES OR A
+FAILURE OF THE SOFTWARE TO OPERATE WITH ANY OTHER SOFTWARE), EVEN IF
+SUCH HOLDER OR OTHER PARTY HAS BEEN ADVISED OF THE POSSIBILITY OF
+SUCH DAMAGES.

Added: branches/upstream/libtest-consistentversion-perl/current/t/00.load.t
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libtest-consistentversion-perl/current/t/00.load.t?rev=50773&op=file
==============================================================================
--- branches/upstream/libtest-consistentversion-perl/current/t/00.load.t (added)
+++ branches/upstream/libtest-consistentversion-perl/current/t/00.load.t Mon Jan 11 21:13:33 2010
@@ -1,0 +1,7 @@
+use Test::More tests => 1;
+
+BEGIN {
+use_ok( 'Test::ConsistentVersion' );
+}
+
+diag( "Testing Test::ConsistentVersion $Test::ConsistentVersion::VERSION" );

Added: branches/upstream/libtest-consistentversion-perl/current/t/01.good.t
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libtest-consistentversion-perl/current/t/01.good.t?rev=50773&op=file
==============================================================================
--- branches/upstream/libtest-consistentversion-perl/current/t/01.good.t (added)
+++ branches/upstream/libtest-consistentversion-perl/current/t/01.good.t Mon Jan 11 21:13:33 2010
@@ -1,0 +1,32 @@
+chdir 't/Sample-Good';
+use lib 'lib';
+
+use Test::Builder::Tester tests => 2;
+use Test::More;
+
+my $expected_tests = 2;     #number of modules to check
+my $testing_pod = eval {require Test::Pod::Content};
+$expected_tests *= 2 if $testing_pod;
+                            #double it if we are checking for pod versions
+$expected_tests+=2;          #plus one each for the Changelog and README file
+
+my $test_count = 1;
+test_out(sprintf 'ok %d - Sample::Good is the same as the distribution version', $test_count++);
+test_out(sprintf 'ok %d - Sample::StillGood is the same as the distribution version', $test_count++);
+test_out(sprintf 'ok %d - Sample::Good POD version is the same as module version', $test_count++) if $testing_pod;
+test_out(sprintf 'ok %d - Sample::StillGood POD version is the same as module version', $test_count++) if $testing_pod;
+test_out(sprintf 'ok %d - Changelog includes reference to the distribution version: 1.2.31', $test_count++);
+test_out(sprintf 'ok %d - README file includes reference to the distribution version: 1.2.31', $test_count++);
+
+test_diag('Test::Pod::Content required to test POD version consistency') unless $testing_pod;
+test_diag(q{Distribution version: 1.2.31});
+
+use Test::ConsistentVersion;
+my $T = Test::Builder->new;
+
+Test::ConsistentVersion::check_consistent_versions();
+my $tests_run = $T->current_test;
+test_test('Failing version check');
+
+is($tests_run, $expected_tests, "Expected number of tests ($expected_tests) were performed");
+

Added: branches/upstream/libtest-consistentversion-perl/current/t/02.bad.t
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libtest-consistentversion-perl/current/t/02.bad.t?rev=50773&op=file
==============================================================================
--- branches/upstream/libtest-consistentversion-perl/current/t/02.bad.t (added)
+++ branches/upstream/libtest-consistentversion-perl/current/t/02.bad.t Mon Jan 11 21:13:33 2010
@@ -1,0 +1,61 @@
+chdir 't/Sample-Bad';
+use lib 'lib';
+
+use Test::Builder::Tester tests => 2;
+use Test::More;
+
+my $expected_tests = 2;     #number of modules to check
+my $testing_pod = eval {require Test::Pod::Content};
+$expected_tests *= 2 if $testing_pod;
+                            #double it if we are checking for pod versions
+$expected_tests += 2; #changelog and readme
+use Test::ConsistentVersion;
+
+my $test_count = 1;
+test_out(sprintf 'ok %d - Sample::Bad is the same as the distribution version', $test_count++);
+test_out(sprintf 'not ok %d - Sample::StillBad is the same as the distribution version', $test_count++);
+test_out(sprintf 'not ok %d - Sample::Bad POD version is the same as module version', $test_count++) if $testing_pod;
+test_out(sprintf 'ok %d - Sample::StillBad POD version is the same as module version', $test_count++) if $testing_pod;
+test_out(sprintf 'not ok %d - Changelog includes reference to the distribution version: 1.2.31', $test_count++);
+test_out(sprintf 'not ok %d - Unable to find README file', $test_count++);
+
+test_diag('Test::Pod::Content required to test POD version consistency') unless $testing_pod;
+test_diag(q{Distribution version: 1.2.31});
+
+# Sample::StillBad has a different version number
+test_err(q{#   Failed test 'Sample::StillBad is the same as the distribution version'});
+test_err(q{#   at lib/Test/ConsistentVersion.pm line 45.});
+test_err(q{#          got: '1.2.30'});
+test_err(q{#     expected: '1.2.31'});
+
+# Sample::Bad has different POD to the module version
+if($testing_pod)
+{
+    test_err(q{#   Failed test 'Sample::Bad POD version is the same as module version'});
+    test_err(sprintf '/#\s+ at .+%s .+/', quotemeta 'Test/Pod/Content.pm');
+    test_err(q{#                   '1.2.30'});
+    test_err(q{#     doesn't match '(?-xism:(^|\s)1\.2\.31(\s|$))'});
+}
+
+# Changelog doesn't have the current version
+test_err(q{#   Failed test 'Changelog includes reference to the distribution version: 1.2.31'});
+test_err(q{#   at lib/Test/ConsistentVersion.pm line 47.});
+test_err(q{#                   'Changelog});
+test_err(q{# });
+test_err(q{# });
+test_err(q{# });
+test_err(q{# 1.2.30});
+test_err(q{# });
+test_err(q{#     First version.});
+test_err(q{# '});
+test_err(q{#     doesn't match '(?-xism:\b1\.2\.31\b)'});
+
+# No readme file:
+test_err(q{#   Failed test 'Unable to find README file'});
+test_err(q{#   at lib/Test/ConsistentVersion.pm line 48.});
+Test::ConsistentVersion::check_consistent_versions();
+my $T = Test::Builder->new;
+my $tests_run = $T->current_test;
+test_test('Failing version check');
+
+is($tests_run, $expected_tests, 'Expected number of tests were run')

Added: branches/upstream/libtest-consistentversion-perl/current/t/Sample-Bad/Changes
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libtest-consistentversion-perl/current/t/Sample-Bad/Changes?rev=50773&op=file
==============================================================================
--- branches/upstream/libtest-consistentversion-perl/current/t/Sample-Bad/Changes (added)
+++ branches/upstream/libtest-consistentversion-perl/current/t/Sample-Bad/Changes Mon Jan 11 21:13:33 2010
@@ -1,0 +1,4 @@
+Changelog
+
+1.2.30
+    First version.

Added: branches/upstream/libtest-consistentversion-perl/current/t/Sample-Bad/MANIFEST
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libtest-consistentversion-perl/current/t/Sample-Bad/MANIFEST?rev=50773&op=file
==============================================================================
--- branches/upstream/libtest-consistentversion-perl/current/t/Sample-Bad/MANIFEST (added)
+++ branches/upstream/libtest-consistentversion-perl/current/t/Sample-Bad/MANIFEST Mon Jan 11 21:13:33 2010
@@ -1,0 +1,4 @@
+lib/Sample/Bad.pm
+lib/Sample/StillBad.pm
+Changes
+MANIFEST

Added: branches/upstream/libtest-consistentversion-perl/current/t/Sample-Bad/lib/Sample/Bad.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libtest-consistentversion-perl/current/t/Sample-Bad/lib/Sample/Bad.pm?rev=50773&op=file
==============================================================================
--- branches/upstream/libtest-consistentversion-perl/current/t/Sample-Bad/lib/Sample/Bad.pm (added)
+++ branches/upstream/libtest-consistentversion-perl/current/t/Sample-Bad/lib/Sample/Bad.pm Mon Jan 11 21:13:33 2010
@@ -1,0 +1,22 @@
+package Sample::Bad;
+
+use warnings;
+use strict;
+
+use version; our $VERSION = qv('1.2.31');
+
+1;
+
+__END__
+
+=head1 NAME
+
+Sample::Bad - Sample module for testing Test::ConsistentVersion.
+
+
+=head1 VERSION
+
+1.2.30
+
+=cut
+

Added: branches/upstream/libtest-consistentversion-perl/current/t/Sample-Bad/lib/Sample/StillBad.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libtest-consistentversion-perl/current/t/Sample-Bad/lib/Sample/StillBad.pm?rev=50773&op=file
==============================================================================
--- branches/upstream/libtest-consistentversion-perl/current/t/Sample-Bad/lib/Sample/StillBad.pm (added)
+++ branches/upstream/libtest-consistentversion-perl/current/t/Sample-Bad/lib/Sample/StillBad.pm Mon Jan 11 21:13:33 2010
@@ -1,0 +1,22 @@
+package Sample::StillBad;
+
+use warnings;
+use strict;
+
+use version; our $VERSION = qv('1.2.30');
+
+1;
+
+__END__
+
+=head1 NAME
+
+Sample::StillBad - Sample module for testing Test::ConsistentVersion.
+
+
+=head1 VERSION
+
+1.2.30
+
+=cut
+

Added: branches/upstream/libtest-consistentversion-perl/current/t/Sample-Good/Changes
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libtest-consistentversion-perl/current/t/Sample-Good/Changes?rev=50773&op=file
==============================================================================
--- branches/upstream/libtest-consistentversion-perl/current/t/Sample-Good/Changes (added)
+++ branches/upstream/libtest-consistentversion-perl/current/t/Sample-Good/Changes Mon Jan 11 21:13:33 2010
@@ -1,0 +1,7 @@
+Changelog
+
+1.2.31
+    Added README file
+
+1.2.30
+    First version.

Added: branches/upstream/libtest-consistentversion-perl/current/t/Sample-Good/MANIFEST
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libtest-consistentversion-perl/current/t/Sample-Good/MANIFEST?rev=50773&op=file
==============================================================================
--- branches/upstream/libtest-consistentversion-perl/current/t/Sample-Good/MANIFEST (added)
+++ branches/upstream/libtest-consistentversion-perl/current/t/Sample-Good/MANIFEST Mon Jan 11 21:13:33 2010
@@ -1,0 +1,4 @@
+lib/Sample/Good.pm
+lib/Sample/StillGood.pm
+Changes
+MANIFEST

Added: branches/upstream/libtest-consistentversion-perl/current/t/Sample-Good/README
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libtest-consistentversion-perl/current/t/Sample-Good/README?rev=50773&op=file
==============================================================================
--- branches/upstream/libtest-consistentversion-perl/current/t/Sample-Good/README (added)
+++ branches/upstream/libtest-consistentversion-perl/current/t/Sample-Good/README Mon Jan 11 21:13:33 2010
@@ -1,0 +1,3 @@
+Sample-Good version 1.2.31
+
+This is just a sample README file for a test distribution.

Added: branches/upstream/libtest-consistentversion-perl/current/t/Sample-Good/lib/Sample/Good.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libtest-consistentversion-perl/current/t/Sample-Good/lib/Sample/Good.pm?rev=50773&op=file
==============================================================================
--- branches/upstream/libtest-consistentversion-perl/current/t/Sample-Good/lib/Sample/Good.pm (added)
+++ branches/upstream/libtest-consistentversion-perl/current/t/Sample-Good/lib/Sample/Good.pm Mon Jan 11 21:13:33 2010
@@ -1,0 +1,22 @@
+package Sample::Good;
+
+use warnings;
+use strict;
+
+use version; our $VERSION = qv('1.2.31');
+
+1;
+
+__END__
+
+=head1 NAME
+
+Sample::Good - Sample module for testing Test::ConsistentVersion.
+
+
+=head1 VERSION
+
+1.2.31
+
+=cut
+

Added: branches/upstream/libtest-consistentversion-perl/current/t/Sample-Good/lib/Sample/StillGood.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libtest-consistentversion-perl/current/t/Sample-Good/lib/Sample/StillGood.pm?rev=50773&op=file
==============================================================================
--- branches/upstream/libtest-consistentversion-perl/current/t/Sample-Good/lib/Sample/StillGood.pm (added)
+++ branches/upstream/libtest-consistentversion-perl/current/t/Sample-Good/lib/Sample/StillGood.pm Mon Jan 11 21:13:33 2010
@@ -1,0 +1,22 @@
+package Sample::StillGood;
+
+use warnings;
+use strict;
+
+use version; our $VERSION = qv('1.2.31');
+
+1;
+
+__END__
+
+=head1 NAME
+
+Sample::StillGood - Sample module for testing Test::ConsistentVersion.
+
+
+=head1 VERSION
+
+1.2.31
+
+=cut
+

Added: branches/upstream/libtest-consistentversion-perl/current/t/perlcritic.t
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libtest-consistentversion-perl/current/t/perlcritic.t?rev=50773&op=file
==============================================================================
--- branches/upstream/libtest-consistentversion-perl/current/t/perlcritic.t (added)
+++ branches/upstream/libtest-consistentversion-perl/current/t/perlcritic.t Mon Jan 11 21:13:33 2010
@@ -1,0 +1,21 @@
+#!perl
+
+use strict;
+use warnings;
+use File::Spec;
+use Test::More;
+use English qw(-no_match_vars);
+
+if ( not $ENV{TEST_AUTHOR} ) {
+    my $msg = 'Author test. Set $ENV{TEST_AUTHOR} to a true value to run.';
+    plan( skip_all => $msg );
+}
+
+eval { require Test::Perl::Critic; };
+
+if ( $EVAL_ERROR ) {
+    my $msg = 'Test::Perl::Critic required to criticise code';
+    plan( skip_all => $msg );
+}
+
+Test::Perl::Critic::all_critic_ok();

Added: branches/upstream/libtest-consistentversion-perl/current/t/pod-coverage.t
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libtest-consistentversion-perl/current/t/pod-coverage.t?rev=50773&op=file
==============================================================================
--- branches/upstream/libtest-consistentversion-perl/current/t/pod-coverage.t (added)
+++ branches/upstream/libtest-consistentversion-perl/current/t/pod-coverage.t Mon Jan 11 21:13:33 2010
@@ -1,0 +1,12 @@
+#!perl -T
+
+use Test::More;
+
+if ( not $ENV{TEST_AUTHOR} ) {
+    my $msg = 'Author test. Set $ENV{TEST_AUTHOR} to a true value to run.';
+    plan( skip_all => $msg );
+}
+
+eval "use Test::Pod::Coverage 1.04";
+plan skip_all => "Test::Pod::Coverage 1.04 required for testing POD coverage" if $@;
+all_pod_coverage_ok();

Added: branches/upstream/libtest-consistentversion-perl/current/t/pod.t
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libtest-consistentversion-perl/current/t/pod.t?rev=50773&op=file
==============================================================================
--- branches/upstream/libtest-consistentversion-perl/current/t/pod.t (added)
+++ branches/upstream/libtest-consistentversion-perl/current/t/pod.t Mon Jan 11 21:13:33 2010
@@ -1,0 +1,12 @@
+#!perl -T
+
+use Test::More;
+
+if ( not $ENV{TEST_AUTHOR} ) {
+    my $msg = 'Author test. Set $ENV{TEST_AUTHOR} to a true value to run.';
+    plan( skip_all => $msg );
+}
+
+eval "use Test::Pod 1.14";
+plan skip_all => "Test::Pod 1.14 required for testing POD" if $@;
+all_pod_files_ok();

Added: branches/upstream/libtest-consistentversion-perl/current/t/version.t
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libtest-consistentversion-perl/current/t/version.t?rev=50773&op=file
==============================================================================
--- branches/upstream/libtest-consistentversion-perl/current/t/version.t (added)
+++ branches/upstream/libtest-consistentversion-perl/current/t/version.t Mon Jan 11 21:13:33 2010
@@ -1,0 +1,10 @@
+use Test::More;
+
+if ( not $ENV{TEST_AUTHOR} ) {
+    my $msg = 'Author test. Set $ENV{TEST_AUTHOR} to a true value to run.';
+    plan( skip_all => $msg );
+}
+
+eval "use Test::ConsistentVersion";
+plan skip_all => "Test::ConsistentVersion required for checking versions" if $@;
+Test::ConsistentVersion::check_consistent_versions();




More information about the Pkg-perl-cvs-commits mailing list