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

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