Fix an obscure regression when inserting an object with a serialize-deflating column set
[dbsrgits/DBIx-Class-Historic.git] / t / lib / DBICTest / Schema / SequenceTest.pm
CommitLineData
67ff5ffa 1package # hide from PAUSE
b829910c 2 DBICTest::Schema::SequenceTest;
67ff5ffa 3
660cf1be 4use base qw/DBICTest::BaseResult/;
67ff5ffa 5
b829910c 6__PACKAGE__->table('sequence_test');
67ff5ffa 7__PACKAGE__->source_info({
8 "source_info_key_A" => "source_info_value_A",
9 "source_info_key_B" => "source_info_value_B",
10 "source_info_key_C" => "source_info_value_C",
b829910c 11 "source_info_key_D" => "source_info_value_D",
67ff5ffa 12});
13__PACKAGE__->add_columns(
b829910c 14 'pkid1' => {
67ff5ffa 15 data_type => 'integer',
16 auto_nextval => 1,
b829910c 17 sequence => 'pkid1_seq',
67ff5ffa 18 },
b829910c 19 'pkid2' => {
67ff5ffa 20 data_type => 'integer',
21 auto_nextval => 1,
b829910c 22 sequence => 'pkid2_seq',
67ff5ffa 23 },
b829910c 24 'nonpkid' => {
67ff5ffa 25 data_type => 'integer',
26 auto_nextval => 1,
b829910c 27 sequence => 'nonpkid_seq',
67ff5ffa 28 },
29 'name' => {
30 data_type => 'varchar',
31 size => 100,
32 is_nullable => 1,
33 },
34);
b829910c 35__PACKAGE__->set_primary_key('pkid1', 'pkid2');
67ff5ffa 36
371;