t/lib/ViewDeps/Result/Quux.pm

   1 package    # hide from PAUSE
   2     ViewDeps::Result::Quux;
   3
   4 use strict;
   5 use warnings;
   6 use base qw(DBIx::Class::Core);
   7
   8 __PACKAGE__->table_class('DBIx::Class::ResultSource::View');
   9 __PACKAGE__->table('quux');
  10
  11 __PACKAGE__->result_source_instance->view_definition(
  12     "select * from quux");
  13
  14 __PACKAGE__->add_columns(
  15     etc => { data_type => 'text' },
  16     c  => { data_type => 'integer', is_nullable => 1 }
  17 );
  18
  19 __PACKAGE__->set_primary_key('c');
  20
  21 __PACKAGE__->belongs_to( 'foo', 'ViewDeps::Result::Foo',
  22     { 'foreign.a' => 'self.c' } );
  23
  24 1;