X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2F30.with_pid_file.t;h=8536c81867486ced6bc4f6bbdba97a3a52572bf6;hb=e7d94e6a7c67db5dd0d6986acb7e87d80d267e35;hp=e7e439cdf705b4fb580a23caf2ad718dec56643d;hpb=10769ed347f340ee0e81d85933ae8f82ff0413da;p=gitmo%2FMooseX-Daemonize.git

diff --git a/t/30.with_pid_file.t b/t/30.with_pid_file.t
index e7e439c..8536c81 100644
--- a/t/30.with_pid_file.t
+++ b/t/30.with_pid_file.t
@@ -6,7 +6,7 @@ use warnings;
 use File::Spec::Functions;
 
 use Test::More 'no_plan';
-use Test::Exception;
+use Test::Fatal;
 use Test::Moose;
 use File::Temp qw(tempdir);
 
@@ -73,9 +73,11 @@ ok($d->has_pidfile, '... we have a pidfile value');
 
 ok(!(-e $PIDFILE), '... the PID file does not exist yet');
 
-lives_ok {
-    $d->start;
-} '... successfully daemonized from (' . $$ . ')';
+is(
+    exception { $d->start },
+    undef,
+    '... successfully daemonized from (' . $$ . ')',
+);
 
 my $p = $d->pidfile;
 isa_ok($p, 'MooseX::Daemonize::Pid::File');