1 package # Hide from PAUSE
7 use base 'DBIC::Test::SQLite';
8 use Class::DBI::Column;
10 __PACKAGE__->set_table('column_object');
12 __PACKAGE__->columns( Primary => 'id' );
13 __PACKAGE__->columns( All => (
17 Class::DBI::Column->new('columna' => {accessor => 'columna_as_read'}),
18 Class::DBI::Column->new('columnb' => {mutator => 'columnb_as_write'}),
21 # Disables the implicit autoinc-on-non-supplied-pk behavior
22 # (and the warning that goes with it)
23 # This is the same behavior as it was pre 0.082900
24 __PACKAGE__->column_info('id')->{is_auto_increment} = 0;
28 id INTEGER PRIMARY KEY,