X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2F93nobindvars.t;h=e6ee0eb2674ee796b967591abfc3554dd3b3565c;hb=98e229bb17149ce985d395f8b928afef698d3dd9;hp=ea77526d1e04a479a55c32e945fdc183fbea4714;hpb=fb4b58e8bc1863b8cbfc8e2e8e6dae03fe1fa720;p=dbsrgits%2FDBIx-Class-Historic.git diff --git a/t/93nobindvars.t b/t/93nobindvars.t index ea77526..e6ee0eb 100644 --- a/t/93nobindvars.t +++ b/t/93nobindvars.t @@ -65,5 +65,6 @@ is( $it->next, undef, "next past end of resultset ok" ); # clean up our mess END { + my $dbh = eval { $schema->storage->_dbh }; $dbh->do("DROP TABLE artist") if $dbh; }