X-Git-Url: http://git.vpit.fr/?p=perl%2Fmodules%2FTest-Leaner.git;a=blobdiff_plain;f=lib%2FTest%2FLeaner.pm;h=bc684ec1c99ab662e9e6c0edefd53513432e3a5f;hp=8d25ca941f036109d7c39b704badb9cc163f264e;hb=c81419dbc3791a54746517231a33b7b11c20842e;hpb=bf415eb37f8b169a2c077a54f089d361787a86dc

diff --git a/lib/Test/Leaner.pm b/lib/Test/Leaner.pm
index 8d25ca9..bc684ec 100644
--- a/lib/Test/Leaner.pm
+++ b/lib/Test/Leaner.pm
@@ -658,7 +658,8 @@ END {
     $? = $failed <= 254 ? $failed : 254;
    } elsif ($plan >= 0) {
     $? = $test == $plan ? 0 : 255;
-   } elsif ($plan == NO_PLAN) {
+   }
+   if ($plan == NO_PLAN) {
     local $\;
     print $TAP_STREAM "1..$test\n";
    }