-package # hide from PAUSE \r
- DBICTest::Schema::CollectionObject;\r
-\r
-use base qw/DBICTest::BaseResult/;\r
-\r
-__PACKAGE__->table('collection_object');\r
-__PACKAGE__->add_columns(\r
- 'collection' => {\r
- data_type => 'integer',\r
- },\r
- 'object' => {\r
- data_type => 'integer',\r
- },\r
-);\r
-__PACKAGE__->set_primary_key(qw/collection object/);\r
-\r
-__PACKAGE__->belongs_to( collection => "DBICTest::Schema::Collection",\r
- { "foreign.collectionid" => "self.collection" }\r
- );\r
-__PACKAGE__->belongs_to( object => "DBICTest::Schema::TypedObject",\r
- { "foreign.objectid" => "self.object" }\r
- );\r
-\r
-1;\r
+package # hide from PAUSE
+ DBICTest::Schema::CollectionObject;
+
+use warnings;
+use strict;
+
+use base qw/DBICTest::BaseResult/;
+
+__PACKAGE__->table('collection_object');
+__PACKAGE__->add_columns(
+ 'collection' => {
+ data_type => 'integer',
+ },
+ 'object' => {
+ data_type => 'integer',
+ },
+);
+__PACKAGE__->set_primary_key(qw/collection object/);
+
+__PACKAGE__->belongs_to( collection => "DBICTest::Schema::Collection",
+ { "foreign.collectionid" => "self.collection" }
+ );
+__PACKAGE__->belongs_to( object => "DBICTest::Schema::TypedObject",
+ { "foreign.objectid" => "self.object" }
+ );
+
+1;