From: John Malmberg <wb8tyw@gmail.com>
Date: Sun, 4 Jan 2009 18:45:11 +0000 (-0600)
Subject: mkppport using catfile for catdir
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=0e88df1c021b57b00806b5c1acdfd528120db28b;p=p5sagit%2Fp5-mst-13.2.git

mkppport using catfile for catdir

Message-id: <496103B7.1000308@gmail.com>
---

diff --git a/mkppport b/mkppport
index 07aa8b2..be41fde 100644
--- a/mkppport
+++ b/mkppport
@@ -12,7 +12,7 @@ sub iterdirs(&);
 
 my $rootdir = dirname($0);
 
-unshift @INC, File::Spec->catfile($rootdir, 't', 'lib');
+unshift @INC, File::Spec->catdir($rootdir, 't', 'lib');
 
 eval q{ use MakeMaker::Test::Utils qw( which_perl ) };
 $@ and die $@;