tests from multicreate

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

diff --git a/t/lib/DBICTest/Schema/BooksInLibrary.pm b/t/lib/DBICTest/Schema/BooksInLibrary.pm
new file mode 100644 (file)
index 0000000..6c2d6aa
--- /dev/null
+++ b/t/lib/DBICTest/Schema/BooksInLibrary.pm
@@ -0,0 +1,32 @@
+package # hide from PAUSE \r
+    DBICTest::Schema::BooksInLibrary;\r
+\r
+use base qw/DBIx::Class::Core/;\r
+\r
+__PACKAGE__->table('books');\r
+__PACKAGE__->add_columns(\r
+  'id' => {\r
+    data_type => 'integer',\r
+    is_auto_increment => 1,\r
+  },\r
+  'source' => {\r
+    data_type => 'varchar',\r
+    size      => '100',\r
+  },\r
+  'owner' => {\r
+    data_type => 'integer',\r
+  },\r
+  'title' => {\r
+    data_type => 'varchar',\r
+    size      => '100',\r
+  },\r
+  'price' => {\r
+    data_type => 'integer',\r
+    is_nullable => 1,\r
+  },\r
+);\r
+__PACKAGE__->set_primary_key('id');\r
+\r
+__PACKAGE__->resultset_attributes({where => { source => "Library" } });\r
+\r
+1;\r