X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=tool%2Fcreate-moose-compatibility-tests.pl;h=950836466f3afd4ee281c19c41521d256b8dc193;hb=refs%2Fheads%2Fmaster;hp=05f33ce1c349e239ccb96a53bfddbd15fc6789ef;hpb=25431bc447d70124c2734d9a69ebe70f23f5b624;p=gitmo%2FMouse.git diff --git a/tool/create-moose-compatibility-tests.pl b/tool/create-moose-compatibility-tests.pl index 05f33ce..9508364 100644 --- a/tool/create-moose-compatibility-tests.pl +++ b/tool/create-moose-compatibility-tests.pl @@ -6,9 +6,9 @@ use File::Path (); use File::Spec (); use File::Basename (); -print "Creating compatibility tests in xt/compatibility/* ...\n"; +print "Creating compatibility tests in xt/compat/* ...\n"; -File::Path::rmtree(File::Spec->catfile('xt', 'compatibility')); +File::Path::rmtree(File::Spec->catfile('xt', 'compat')); # some test does not pass... currently skip it. my %SKIP_TEST = ( @@ -51,7 +51,7 @@ File::Find::find( my $dirname = File::Basename::dirname($_); - my $tmpdir = File::Spec->catfile('xt', 'compatibility', $dirname); + my $tmpdir = File::Spec->catfile('xt', 'compat', $dirname); File::Path::mkpath($tmpdir); my $tmpfile = File::Spec->catfile($tmpdir, $basename);