Fix silent failures on autoinc PK without an is_auto_increment attribute

[dbsrgits/DBIx-Class.git] / t / cdbi / testlib / Film.pm

diff --git a/t/cdbi/testlib/Film.pm b/t/cdbi/testlib/Film.pm
index 3d6c457..5c43f5a 100644 (file)
--- a/t/cdbi/testlib/Film.pm
+++ b/t/cdbi/testlib/Film.pm
@@ -1,15 +1,22 @@
-package # hide from PAUSE 
+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),
@@ -21,7 +28,7 @@ sub create_sql {
   }
 }
 
-sub create_test_film { 
+sub create_test_film {
   return shift->create({
     Title             => 'Bad Taste',
     Director          => 'Peter Jackson',