X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2F745db2.t;h=3ba85794b1e933ba9ed6f500ef18861afe9fec32;hb=f66e15f39f65384d95c4a254b9aefe14f32e49e3;hp=2e76bcae515220344c43cbfcd3a1286a3a4001a4;hpb=25aa8311b1e1b31a72c8a0a878b41bd5dc637eb1;p=dbsrgits%2FDBIx-Class-Historic.git diff --git a/t/745db2.t b/t/745db2.t index 2e76bca..3ba8579 100644 --- a/t/745db2.t +++ b/t/745db2.t @@ -49,7 +49,7 @@ is( $it->count, 3, "LIMIT count ok" ); my @all = $it->all; is (@all, 3, 'Number of ->all objects matches count'); -$it->reset +$it->reset; is( $it->next->name, "foo", "iterator->next ok" ); is( $it->next->name, "Artist 1", "iterator->next ok" ); is( $it->next->name, "Artist 2", "iterator->next ok" ); @@ -85,5 +85,6 @@ is_deeply($type_info, $test_type_info, 'columns_info_for - column data types'); # clean up our mess END { + my $dbh = eval { $schema->storage->_dbh }; $dbh->do("DROP TABLE artist") if $dbh; }