X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2Flib%2FTestSchemaBaseClass.pm;h=b83172b61441ba55bd2dc22f6dfb08fc68e86459;hb=50b95db6f08695f02fd804bc71c6c222cd310d05;hp=dc4e95575a6ab9c83ea76298c511f41a849960ee;hpb=310f3603f4dee670ce5b733c862c62c35d96cd3c;p=dbsrgits%2FDBIx-Class-Schema-Loader.git diff --git a/t/lib/TestSchemaBaseClass.pm b/t/lib/TestSchemaBaseClass.pm index dc4e955..b83172b 100644 --- a/t/lib/TestSchemaBaseClass.pm +++ b/t/lib/TestSchemaBaseClass.pm @@ -7,7 +7,7 @@ sub connection { my ($self, @info) = @_; if ($info[0] =~ /^dbi/) { - $test_ok = 1; + $test_ok++; } return $self->next::method(@info);