lib/DBIx/Class/Schema/Journal/DB/ChangeSet.pm

   1 package DBIx::Class::Schema::Journal::DB::ChangeSet;
   2
   3 use base 'DBIx::Class';
   4
   5 __PACKAGE__->load_components(qw/InflateColumn::DateTime Core/);
   6 __PACKAGE__->table('changeset');
   7
   8 __PACKAGE__->add_columns(
   9                          ID => {
  10                              data_type => 'integer',
  11                              is_auto_increment => 1,
  12                              is_primary_key => 1,
  13                              is_nullable => 0,
  14                          },
  15                          user_id => {
  16                              data_type => 'integer',
  17                              is_nullable => 1,
  18                              is_foreign_key => 1,
  19                          },
  20                          set_date => {
  21                              data_type => 'timestamp',
  22                              is_nullable => 0,
  23                          },
  24                          session_id => {
  25                              data_type => 'varchar',
  26                              size => 255,
  27                              is_nullable => 1,
  28                          },
  29                          );
  30
  31 sub new {
  32     my $self = shift->next::method(@_);
  33     $self->set_date(gmtime);
  34     return $self;
  35 }
  36
  37 __PACKAGE__->set_primary_key('ID');
  38
  39 1;