We should fail two times for each test sub not invoked

[perl/modules/Sub-Op.git] / t / 10-base.t

diff --git a/t/10-base.t b/t/10-base.t
index b5ce7317d85c165fdbc37b0240fd4b8e8f6f439b..2acce9a8a4fca9a02ff2972eeb7aee78db8c12fb 100644 (file)
--- a/t/10-base.t
+++ b/t/10-base.t
@@ -71,7 +71,7 @@ our $called;
 
   is $called, $calls, "@names: the hook was called the right number of times";
   if ($called < $calls) {
-   fail for $called + 1 .. $calls;
+   fail, fail for $called + 1 .. $calls;
   }
  }
 }