Rename ext/Devel/PPPort to ext/Devel-PPPort

It has its tentacles in many other places.

1 files changed, 2 insertions, 2 deletions

diff --git a/mkppport b/mkppport
index be41fde353..4636d3e563 100644
--- a/mkppport
+++ b/mkppport
@@ -56,7 +56,7 @@ unshift @INC, File::Spec->catdir($absroot, 'lib');
 
 # Change to Devel::PPPort directory, as it needs the stuff
 # from the parts/ directory
-chdir File::Spec->catdir($rootdir, 'ext', 'Devel', 'PPPort');
+chdir File::Spec->catdir($rootdir, 'ext', 'Devel-PPPort');
 
 # Capture and remove temporary files
 my @unlink;
@@ -134,7 +134,7 @@ sub readlist
 #----------------------------------------------
 sub run
 {
-  my @args = ("-I" . File::Spec->catdir((File::Spec->updir) x 3, 'lib'), @_);
+  my @args = ("-I" . File::Spec->catdir((File::Spec->updir) x 2, 'lib'), @_);
   my $run = $perl =~ m/\s/ ? qq("$perl") : $perl;
   for (@args) {
     $_ = qq("$_") if $^O eq 'VMS' && /^[^"]/;