Document UNIVERSAL->import deprecation in perldelta
[p5sagit/p5-mst-13.2.git] / utils / instmodsh.PL
index 36b8858..08a47b7 100644 (file)
@@ -35,8 +35,8 @@ use File::Spec;
 
 my $instmodsh
     = File::Spec->catfile(File::Spec->catdir(File::Spec->updir,
-                                            qw(ext ExtUtils-MakeMaker bin
-                                               instmodsh)));
+                                            qw(cpan ExtUtils-MakeMaker bin)),
+                         'instmodsh');
 
 if (open(INSTMODSH, $instmodsh)) {
     print OUT <INSTMODSH>;