Add test files and test for vie

[dbsrgits/DBIx-Class.git] / t / lib / ViewDeps / Result / Bar.pm

diff --git a/t/lib/ViewDeps/Result/Bar.pm b/t/lib/ViewDeps/Result/Bar.pm
new file mode 100644 (file)
index 0000000..99a1d68
--- /dev/null
+++ b/t/lib/ViewDeps/Result/Bar.pm
@@ -0,0 +1,32 @@
+package # hide from PAUSE
+    ViewDeps::Result::Bar;
+
+use strict;
+use warnings;
+use parent qw(ViewDeps::Result::Foo);
+
+require ViewDeps::Result::Mixin;
+
+__PACKAGE__->table('bar');
+
+__PACKAGE__->result_source_instance->depends_on(
+    {  ViewDeps::Result::Mixin->result_source_instance->name => 1 }
+);
+
+__PACKAGE__->add_columns(
+  b => { data_type => 'integer' }
+);
+
+__PACKAGE__->belongs_to(
+  'b_thang',
+  'ViewDeps::Result::JustATable',
+  { 'foreign.id' => 'self.b' },
+);
+
+__PACKAGE__->has_many(
+  'foos',
+  'ViewDeps::Result::Foo',
+  { 'foreign.a' => 'self.id' }
+);
+
+1;