3 use DBIx::Class::PK::Auto;
4 use DBIx::Class::PK::Auto::SQLite;
12 unshift(@DBICTest::Artist::ISA, qw/DBIx::Class::PK::Auto
13 DBIx::Class::PK::Auto::SQLite/);
15 # add an artist without primary key to test Auto
16 my $artist = DBICTest::Artist->create( { name => 'Auto' } );
17 $artist->name( 'Auto Change' );
18 ok($artist->update, 'update on object created without PK ok');