X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2Fcdbi%2Ftestlib%2FFilm.pm;h=5c43f5a2a40d19d76b32e37df37fdeec0b60dd2b;hb=HEAD;hp=9ea829d4fc186e5daef87c8546b8dc9740142c63;hpb=8273e845426f0187b4ad6c4a1b42286fa09a648f;p=dbsrgits%2FDBIx-Class.git diff --git a/t/cdbi/testlib/Film.pm b/t/cdbi/testlib/Film.pm index 9ea829d..5c43f5a 100644 --- a/t/cdbi/testlib/Film.pm +++ b/t/cdbi/testlib/Film.pm @@ -1,15 +1,22 @@ package # hide from PAUSE Film; -use base 'DBIC::Test::SQLite'; +use warnings; use strict; +use base 'DBIC::Test::SQLite'; + __PACKAGE__->set_table('Movies'); __PACKAGE__->columns('Primary', 'Title'); __PACKAGE__->columns('Essential', qw( Title )); __PACKAGE__->columns('Directors', qw( Director CoDirector )); __PACKAGE__->columns('Other', qw( Rating NumExplodingSheep HasVomit )); +# Disables the implicit autoinc-on-non-supplied-pk behavior +# (and the warning that goes with it) +# This is the same behavior as it was pre 0.082900 +__PACKAGE__->column_info('title')->{is_auto_increment} = 0; + sub create_sql { return qq{ title VARCHAR(255),