X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2Frun%2F10auto.tl;h=7c795f40b460e4022b4cdbe0704ebae6f0f4f618;hb=f83d99c80b593ccf0c445784cda98cb4de0c8564;hp=1d6b56995dd49babc002867085a1b1b67f913c91;hpb=2f6e5af93d6cbbd2fdec4b5cfcdac5cb681e55c6;p=dbsrgits%2FDBIx-Class-Historic.git diff --git a/t/run/10auto.tl b/t/run/10auto.tl index 1d6b569..7c795f4 100644 --- a/t/run/10auto.tl +++ b/t/run/10auto.tl @@ -1,11 +1,13 @@ sub run_tests { +my $schema = shift; plan tests => 2; -DBICTest->class("Artist")->load_components(qw/PK::Auto::SQLite/); +$schema->class("Artist")->load_components(qw/PK::Auto::SQLite/); + # Should just be PK::Auto but this ensures the compat shim works # add an artist without primary key to test Auto -my $artist = DBICTest->class("Artist")->create( { name => 'Auto' } ); +my $artist = $schema->resultset("Artist")->create( { name => 'Auto' } ); $artist->name( 'Auto Change' ); ok($artist->update, 'update on object created without PK ok');