1 package DBIx::Class::Schema::Journal::DB::ChangeSet;
3 use base 'DBIx::Class::Core';
5 sub journal_define_table {
6 my ( $class, $schema_class, $prefix ) = @_;
8 $class->load_components(qw/InflateColumn::DateTime/);
9 $class->table($prefix . 'changeset');
13 data_type => 'integer',
14 is_auto_increment => 1,
19 data_type => 'integer',
24 data_type => 'timestamp',
28 data_type => 'varchar',
34 $class->set_primary_key('ID');
38 my $self = shift->next::method(@_);
39 # I think we should not do the following and
40 # instead use DBIx::Class::TimeStamp. If I
41 # can think of a good way (passing a version on
42 # import?) to do it and retain backcompat I will.
45 $self->set_date(scalar gmtime);