X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2Fpsgi_file_testapp_engine_psgi_compat.t;h=1f5b4d95030b7536fff0f4360a9d6a461d28af02;hb=bf590d36b554c02f9af89d8f5677be23297fbaf3;hp=72eec237887fd8a5b348d6761fc7048bc86ca1ab;hpb=ce2755cddb0176f58352093e61040ebad5346491;p=catagits%2FCatalyst-Runtime.git diff --git a/t/psgi_file_testapp_engine_psgi_compat.t b/t/psgi_file_testapp_engine_psgi_compat.t index 72eec23..1f5b4d9 100644 --- a/t/psgi_file_testapp_engine_psgi_compat.t +++ b/t/psgi_file_testapp_engine_psgi_compat.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;