whitespace, use base Core, and an idea on backcompat

[dbsrgits/DBIx-Class-Journal.git] / lib / DBIx / Class / Schema / Journal / DB / ChangeSet.pm

diff --git a/lib/DBIx/Class/Schema/Journal/DB/ChangeSet.pm b/lib/DBIx/Class/Schema/Journal/DB/ChangeSet.pm
index 688949a..05bb248 100644 (file)
--- a/lib/DBIx/Class/Schema/Journal/DB/ChangeSet.pm
+++ b/lib/DBIx/Class/Schema/Journal/DB/ChangeSet.pm
@@ -1,35 +1,41 @@
 package DBIx::Class::Schema::Journal::DB::ChangeSet;
 
-use base 'DBIx::Class';
+use base 'DBIx::Class::Core';
 
-__PACKAGE__->load_components(qw/InflateColumn::DateTime Core/);
+__PACKAGE__->load_components(qw/InflateColumn::DateTime/);
 __PACKAGE__->table('changeset');
 
 __PACKAGE__->add_columns(
-                         ID => {
-                             data_type => 'integer',
-                             is_auto_increment => 1,
-                             is_primary_key => 1,
-                             is_nullable => 0,
-                         },
-                         user_id => {
-                             data_type => 'integer',
-                             is_nullable => 1,
-                             is_foreign_key => 1,
-                         },
-                         set_date => {
-                             data_type => 'timestamp',
-                             is_nullable => 0,
-                         },
-                         session_id => {
-                             data_type => 'varchar',
-                             size => 255,
-                             is_nullable => 1,
-                         },
-                         );
+       ID => {
+               data_type => 'integer',
+               is_auto_increment => 1,
+               is_primary_key => 1,
+               is_nullable => 0,
+       },
+       user_id => {
+               data_type => 'integer',
+               is_nullable => 1,
+               is_foreign_key => 1,
+       },
+       set_date => {
+               data_type => 'timestamp',
+               is_nullable => 0,
+       },
+       session_id => {
+               data_type => 'varchar',
+               size => 255,
+               is_nullable => 1,
+       },
+);
 
 sub new {
     my $self = shift->next::method(@_);
+        # I think we should not do the following and
+        # instead use DBIx::Class::TimeStamp.  If I
+        # can think of a good way (passing a version on
+        # import?) to do it and retain backcompat I will.
+        #
+        # --fREW, 01-27-2010
     $self->set_date(gmtime);
     return $self;
 }