tests from multicreate

[chaz/p5-DBIx-Class-ResultSet-RecursiveUpdate] / t / lib / DBICTest / Schema / Collection.pm

diff --git a/t/lib/DBICTest/Schema/Collection.pm b/t/lib/DBICTest/Schema/Collection.pm
new file mode 100644 (file)
index 0000000..1c11dc6
--- /dev/null
+++ b/t/lib/DBICTest/Schema/Collection.pm
@@ -0,0 +1,30 @@
+package # hide from PAUSE \r
+    DBICTest::Schema::Collection;\r
+\r
+use base qw/DBIx::Class::Core/;\r
+\r
+__PACKAGE__->table('collection');\r
+__PACKAGE__->add_columns(\r
+  'collectionid' => {\r
+    data_type => 'integer',\r
+    is_auto_increment => 1,\r
+  },\r
+  'name' => {\r
+    data_type => 'varchar',\r
+    size      => 100,\r
+  },\r
+);\r
+__PACKAGE__->set_primary_key('collectionid');\r
+\r
+__PACKAGE__->has_many( collection_object => "DBICTest::Schema::CollectionObject",\r
+                       { "foreign.collection" => "self.collectionid" }\r
+                     );\r
+__PACKAGE__->many_to_many( objects => collection_object => "object" );\r
+__PACKAGE__->many_to_many( pointy_objects => collection_object => "object",\r
+                           { where => { "object.type" => "pointy" } }\r
+                         );\r
+__PACKAGE__->many_to_many( round_objects => collection_object => "object",\r
+                           { where => { "object.type" => "round" } } \r
+                         );\r
+\r
+1;\r