X-Git-Url: http://git.vpit.fr/?p=perl%2Fmodules%2Findirect.git;a=blobdiff_plain;f=t%2F10-args.t;h=683b57e870432b020b8a4ab47d97ddcae2bdeec2;hp=bb44e978fb1e346c02e01bd9db1f01f7c171e884;hb=7b0b52eea73aedd1cb0909d1c08766dc4782a5fb;hpb=efb7ebf910d324ec6f2dcd1fd7e6650b23a5dac7

diff --git a/t/10-args.t b/t/10-args.t
index bb44e97..683b57e 100644
--- a/t/10-args.t
+++ b/t/10-args.t
@@ -32,10 +32,10 @@ HERE
  eval <<'HERE';
   die qq{shouldn't even compile\n};
   no indirect ':fatal', hook => sub { die 'should not be called' };
-  my $x = new Fatal;
+  my $x = new Croaked;
   $x = new NotReached;
 HERE
- like $@, expect('Fatal'), 'croaks when :fatal is specified';
+ like $@, expect('Croaked'), 'croaks when :fatal is specified';
 }
 
 {