t/lib/DBICVersion_v2.pm

   1 package DBICVersion::Table;
   2
   3 use base 'DBIx::Class::Core';
   4 use strict;
   5 use warnings;
   6
   7 __PACKAGE__->table('TestVersion');
   8
   9 __PACKAGE__->add_columns
  10     ( 'Version' => {
  11         'data_type' => 'INTEGER',
  12         'is_auto_increment' => 1,
  13         'default_value' => undef,
  14         'is_foreign_key' => 0,
  15         'is_nullable' => 0,
  16         'size' => ''
  17         },
  18       'VersionName' => {
  19         'data_type' => 'VARCHAR',
  20         'is_auto_increment' => 0,
  21         'default_value' => undef,
  22         'is_foreign_key' => 0,
  23         'is_nullable' => 0,
  24         'size' => '10'
  25         },
  26       'NewVersionName' => {
  27         'data_type' => 'VARCHAR',
  28         'is_auto_increment' => 0,
  29         'default_value' => undef,
  30         'is_foreign_key' => 0,
  31         'is_nullable' => 1,
  32         'size' => '20'
  33         }
  34       );
  35
  36 __PACKAGE__->set_primary_key('Version');
  37
  38 package DBICVersion::Schema;
  39 use base 'DBIx::Class::Schema';
  40 use strict;
  41 use warnings;
  42
  43 our $VERSION = '2.0';
  44
  45 __PACKAGE__->register_class('Table', 'DBICVersion::Table');
  46 __PACKAGE__->load_components('+DBIx::Class::Schema::Versioned');
  47 __PACKAGE__->upgrade_directory('t/var/');
  48 __PACKAGE__->backup_directory('t/var/backup/');
  49
  50 #sub upgrade_directory
  51 #{
  52 #    return 't/var/';
  53 #}
  54
  55 1;