10 use File::Temp qw/ tempdir /;
14 $temp = tempdir( CLEANUP => 1 );
16 $ENV{CATALYST_HOME} = $temp;
17 open(my $psgi, '>', File::Spec->catfile($temp, 'testapp.psgi')) or die;
22 $main::have_loaded_psgi = 1;
23 my $app = TestApp->psgi_app;
27 use Catalyst::Test qw/ TestApp /;
30 ok $main::have_loaded_psgi;