X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2F01.filecreate.t;h=127c0e830a1382688a37ded84ce8e32c9c19d6c0;hb=f3372ec96b39b4940acc393785b63df2ac229b96;hp=18fecd03c2229807097fdf7dfc3448f566f8c765;hpb=510724ba6d30410fd17bf1962c5b563bf7dda8c1;p=gitmo%2FMooseX-Daemonize.git diff --git a/t/01.filecreate.t b/t/01.filecreate.t index 18fecd0..127c0e8 100644 --- a/t/01.filecreate.t +++ b/t/01.filecreate.t @@ -26,8 +26,8 @@ $ENV{MX_DAEMON_STDERR} = catfile($dir, 'Err.txt'); with qw(MooseX::Daemonize); has filename => ( isa => 'Str', is => 'ro' ); - - after start => sub { + + after start => sub { my $self = shift; if ($self->is_daemon) { $self->create_file( $self->filename ); @@ -82,14 +82,14 @@ is($app->exit_code, MooseX::Daemonize->OK, '... got the right error code'); if (DEBUG) { diag `ps $pid`; - diag "Status is: " . $app->status_message; + diag "Status is: " . $app->status_message; } ok( -e $app->filename, "file exists" ); if (DEBUG) { diag `ps $pid`; - diag "Status is: " . $app->status_message; + diag "Status is: " . $app->status_message; } ok( $app->stop, '... app stopped' ); @@ -102,7 +102,7 @@ is($app->exit_code, MooseX::Daemonize->ERROR, '... got the right error code'); if (DEBUG) { diag `ps $pid`; - diag "Status is: " . $app->status_message; + diag "Status is: " . $app->status_message; } ok( not(-e $app->pidfile->file) , '... pidfile gone' );