X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2F30.with_pid_file.t;h=e7e439cdf705b4fb580a23caf2ad718dec56643d;hb=e803cff500bb7c9926ef94e9ef5a973d8fd103b6;hp=135673b240dd2985959ea57b55a5c060ae873e7b;hpb=92cf56b7c3fd91568e4b964319a7862fc4f1d651;p=gitmo%2FMooseX-Daemonize.git diff --git a/t/30.with_pid_file.t b/t/30.with_pid_file.t index 135673b..e7e439c 100644 --- a/t/30.with_pid_file.t +++ b/t/30.with_pid_file.t @@ -3,12 +3,15 @@ use strict; use warnings; -use Cwd; use File::Spec::Functions; -use Test::More no_plan => 1; +use Test::More 'no_plan'; use Test::Exception; use Test::Moose; +use File::Temp qw(tempdir); + +my $dir = tempdir( CLEANUP => 1 ); + BEGIN { use_ok('MooseX::Daemonize::Core'); @@ -16,10 +19,9 @@ BEGIN { use constant DEBUG => 0; -my $CWD = Cwd::cwd; -my $PIDFILE = catfile($CWD, 'test-app.pid'); -$ENV{MX_DAEMON_STDOUT} = catfile($CWD, 'Out.txt'); -$ENV{MX_DAEMON_STDERR} = catfile($CWD, 'Err.txt'); +my $PIDFILE = catfile($dir, 'test-app.pid'); +$ENV{MX_DAEMON_STDOUT} = catfile($dir, 'Out.txt'); +$ENV{MX_DAEMON_STDERR} = catfile($dir, 'Err.txt'); { package MyFooDaemon;