X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=catagits%2FCatalyst-Runtime.git;a=blobdiff_plain;f=t%2Fpsgi_file_testapp.t;fp=t%2Fpsgi_file_testapp.t;h=14e25fb9751a65329cc54936e405f2d6e906bd39;hp=ea06d558e8810245828fefea56cd6b15940d1c5b;hb=94d7a76e1f113e306327a86cbdbcae2afd428f0a;hpb=df894348b6f8e0bea1b3d0576aad28027ee930df diff --git a/t/psgi_file_testapp.t b/t/psgi_file_testapp.t index ea06d55..14e25fb 100644 --- a/t/psgi_file_testapp.t +++ b/t/psgi_file_testapp.t @@ -14,7 +14,7 @@ BEGIN { $temp = tempdir( CLEANUP => 1 ); $ENV{CATALYST_HOME} = $temp; - open(my $psgi, '>', File::Spec->catdir($temp, 'testapp.psgi')) or die; + open(my $psgi, '>', File::Spec->catfile($temp, 'testapp.psgi')) or die; print $psgi q{ use strict; use TestApp;