X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=xt%2Fversion-numbers.t;fp=xt%2Fversion-numbers.t;h=a0a08fa3c0fbffeb62d957cf76bdf6b52ab0e202;hb=2c34d7cb1b9539e5ac877db137ea7b2ef8f93d4c;hp=69b7cb96e49c63a69c9af8a32829161406a889f0;hpb=ab8ab47a739539677817d6a7493b888c7a7815f6;p=catagits%2FCatalyst-Action-Serialize-Data-Serializer.git

diff --git a/xt/version-numbers.t b/xt/version-numbers.t
index 69b7cb9..a0a08fa 100644
--- a/xt/version-numbers.t
+++ b/xt/version-numbers.t
@@ -1,23 +1,30 @@
 use strict;
 use warnings;
 
+use FindBin qw/$Bin/;
+use File::Spec;
 use File::Find::Rule;
 use Module::Info;
 
-use Test::More qw( no_plan );
+use Test::More;
 
 my %versions;
-for my $pm_file ( File::Find::Rule->file->name( qr/\.pm$/ )->in('lib' ) ) {
+for my $pm_file ( File::Find::Rule->file->name( qr/\.pm$/ )->in(File::Spec->catdir($Bin, '..', 'lib') ) ) {
     my $mod = Module::Info->new_from_file($pm_file);
 
-    ( my $stripped_file = $pm_file ) =~ s{^lib/}{};
+    ( my $stripped_file = $pm_file ) =~ s{.*/lib/}{};
 
     $versions{$stripped_file} = $mod->version;
 }
 
-my $moose_ver = $versions{'Catalyst/Action/REST.pm'};
+my $ver = delete $versions{'Catalyst/Action/REST.pm'};
+ok $ver;
+ok scalar(keys %versions);
 
-for my $module ( grep { $_ ne 'Catalyst/Action/REST.pm' } sort keys %versions ) {
-    is( $versions{$module}, $moose_ver,
+for my $module ( sort keys %versions ) {
+    is( $versions{$module}, $ver,
         "version for $module is the same as in Catalyst/Action/REST.pm" );
 }
+
+done_testing;
+