X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2F748informix.t;h=42bdac8984d59b113c5e81bd79850376f13752e5;hb=12270263042d2650cca1b9693cdab83be7099f9a;hp=ad21c2e18732fa2765ed836931a78528f1a58e1b;hpb=199fbc453ec03891d0e156d7353c5e992ba4de47;p=dbsrgits%2FDBIx-Class.git diff --git a/t/748informix.t b/t/748informix.t index ad21c2e..42bdac8 100644 --- a/t/748informix.t +++ b/t/748informix.t @@ -133,7 +133,7 @@ lives_ok { } 'with_deferred_fk_checks code survived'; is eval { $schema->resultset('Track')->find(999)->title }, 'deferred FK track', - 'code in with_deferred_fk_checks worked'; + 'code in with_deferred_fk_checks worked'; throws_ok { $schema->resultset('Track')->create({ @@ -145,6 +145,7 @@ done_testing; # clean up our mess END { - my $dbh = eval { $schema->storage->_dbh }; - $dbh->do("DROP TABLE artist") if $dbh; + my $dbh = eval { $schema->storage->_dbh }; + $dbh->do("DROP TABLE artist") if $dbh; + undef $schema; }