Cleaner implementations for Perl_clone_params_{new,del}

[p5sagit/p5-mst-13.2.git] / utils / ptardiff.PL

diff --git a/utils/ptardiff.PL b/utils/ptardiff.PL
index cfc83b3..e68f11f 100644 (file)
--- a/utils/ptardiff.PL
+++ b/utils/ptardiff.PL
@@ -35,7 +35,7 @@ use File::Spec;
 
 my $script = File::Spec->catfile(
             File::Spec->catdir(
-                File::Spec->updir, qw[lib Archive Tar bin]
+                File::Spec->updir, qw[cpan Archive-Tar bin]
             ), "ptardiff");
 
 if (open(IN, $script)) {