From: Stevan Little Date: Mon, 3 Dec 2007 17:39:42 +0000 (+0000) Subject: okay,.. I think this is ready for release X-Git-Tag: 0_06~10 X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=43d819aadfa20bc9f450971a57b092da28736e1b;p=gitmo%2FMooseX-Daemonize.git okay,.. I think this is ready for release --- diff --git a/t/01.filecreate.t b/t/01.filecreate.t index 6293204..01cc2b7 100644 --- a/t/01.filecreate.t +++ b/t/01.filecreate.t @@ -14,7 +14,11 @@ use MooseX::Daemonize; has filename => ( isa => 'Str', is => 'ro' ); - after start => sub { $_[0]->create_file( $_[0]->filename ) }; + after start => sub { + my $self = shift; + $self->create_file( $self->filename ) + if $self->is_daemon; + }; sub create_file { my ( $self, $file ) = @_; diff --git a/t/02.stdout.t b/t/02.stdout.t index f76a392..4d596c1 100644 --- a/t/02.stdout.t +++ b/t/02.stdout.t @@ -14,7 +14,8 @@ my $Test = Test::Builder->new; after start => sub { my ($self) = @_; - $self->output_ok(); + $self->output_ok() + if $self->is_daemon; }; sub output_ok {