t/no-component-lib/DBICVersion_v4.pm

   1 package DBICVersion::Foo;
   2
   3 use base 'DBIx::Class::Core';
   4 use strict;
   5 use warnings;
   6
   7 __PACKAGE__->table('Foo');
   8
   9 __PACKAGE__->add_columns(
  10    foo => {
  11       data_type => 'INTEGER',
  12       is_auto_increment => 1,
  13    },
  14    bar => {
  15       data_type => 'VARCHAR',
  16       size => '10'
  17    },
  18    baz => {
  19       data_type => 'VARCHAR',
  20       size => '10',
  21       is_nullable => 1,
  22    },
  23 );
  24
  25 __PACKAGE__->set_primary_key('foo');
  26
  27 package DBICVersion::Schema;
  28 use base 'DBIx::Class::Schema';
  29 use strict;
  30 use warnings;
  31
  32 our $VERSION = '2.0';
  33
  34 __PACKAGE__->register_class('Foo', 'DBICVersion::Foo');
  35
  36 1;