[dbsrgits/DBIx-Class-UUIDColumns.git] / t / lib / DBIC / Test / Schema / Test.pm

# $Id$
package DBIC::Test::Schema::Test;
use strict;
use warnings;

BEGIN {
    use base qw/DBIx::Class::Core/;
};

__PACKAGE__->load_components(qw/UUIDColumns Core/);
__PACKAGE__->table('test');
__PACKAGE__->add_columns(
  'id' => {
    data_type => 'varchar',
    size      => 36,
  },
);
__PACKAGE__->set_primary_key('id');
__PACKAGE__->uuid_columns('id');

1;
Commit	Line	Data
a19bdae0	1	# $Id$
	2	package DBIC::Test::Schema::Test;
	3	use strict;
	4	use warnings;
	5
	6	BEGIN {
	7	use base qw/DBIx::Class::Core/;
	8	};
	9
	10	__PACKAGE__->load_components(qw/UUIDColumns Core/);
	11	__PACKAGE__->table('test');
	12	__PACKAGE__->add_columns(
	13	'id' => {
	14	data_type => 'varchar',
	15	size => 36,
	16	},
	17	);
	18	__PACKAGE__->set_primary_key('id');
	19	__PACKAGE__->uuid_columns('id');
	20
	21	1;