X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=gitmo%2FMouse.git;a=blobdiff_plain;f=tool%2Fcreate-moose-compatibility-tests.pl;fp=tool%2Fcreate-moose-compatibility-tests.pl;h=950836466f3afd4ee281c19c41521d256b8dc193;hp=05f33ce1c349e239ccb96a53bfddbd15fc6789ef;hb=2af880191b27692321cb8c3f2b90de5902b7b469;hpb=fad99075beae804374b22c9e356f90daf23bbc05 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);