X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2F01generate.t;h=62047c6dc51f335faf88d4bc5eedabe453fc677d;hb=c771453abebe09026dad9f31fa2b64971aff2616;hp=126a36dfab8331aaefef893cd0373c2081bb6e4f;hpb=a3dc0922ce5f3b7b3f155eaa65f2e3632008b5b3;p=dbsrgits%2FSQL-Abstract.git diff --git a/t/01generate.t b/t/01generate.t index 126a36d..62047c6 100644 --- a/t/01generate.t +++ b/t/01generate.t @@ -547,10 +547,6 @@ my @tests = ( }, ); - -plan tests => scalar(grep { !$_->{warning_like} } @tests) * 2 - + scalar(grep { $_->{warning_like} } @tests) * 4; - for my $t (@tests) { local $"=', '; @@ -600,3 +596,5 @@ for my $t (@tests) { } } } + +done_testing;