]>
Dogcows Code - chaz/p5-DBIx-Class-ResultSet-RecursiveUpdate/blob - SequenceTest.pm
bea3f4bd65c1c51c4cf99b79c33a86f3d797141c
1 package # hide from PAUSE
2 DBICTest
::Schema
::SequenceTest
;
4 use base
'DBIx::Class::Core';
6 __PACKAGE__-
>table('sequence_test');
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",
11 "source_info_key_D" => "source_info_value_D",
13 __PACKAGE__-
>add_columns(
15 data_type
=> 'integer',
17 sequence
=> 'pkid1_seq',
20 data_type
=> 'integer',
22 sequence
=> 'pkid2_seq',
25 data_type
=> 'integer',
27 sequence
=> 'nonpkid_seq',
30 data_type
=> 'varchar',
35 __PACKAGE__-
>set_primary_key('pkid1', 'pkid2');
This page took 0.03571 seconds and 3 git commands to generate.