move xt tests to xt/author for Module::Install to work
[gitmo/MooseX-Singleton.git] / xt / author / version-numbers.t
CommitLineData
da16d915 1use strict;
2use warnings;
3
eb98d2dd 4use Test::More;
5
6eval <<'EOF';
da16d915 7use File::Find::Rule;
8use Module::Info;
eb98d2dd 9EOF
da16d915 10
eb98d2dd 11plan skip_all => 'File::Find::Rule and Module::Info required for testing version numbers' if $@;
da16d915 12
13
14my %versions;
15for my $pm_file ( File::Find::Rule->file->name( qr/\.pm$/ )->in('lib' ) ) {
16 my $mod = Module::Info->new_from_file($pm_file);
17
18 ( my $stripped_file = $pm_file ) =~ s{^lib/}{};
19
20 $versions{$stripped_file} = $mod->version;
21}
22
23my $moose_ver = $versions{'MooseX/Singleton.pm'};
24
25for my $module ( grep { $_ ne 'MooseX/Singleton.pm' } sort keys %versions ) {
26 is( $versions{$module}, $moose_ver,
27 "version for $module is the same as in MooseX/Singleton.pm" );
28}
eb98d2dd 29
30done_testing;