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

package    # hide from PAUSE
    ViewDeps::Result::Quux;

use strict;
use warnings;
use base qw(DBIx::Class::Core);

__PACKAGE__->table_class('DBIx::Class::ResultSource::View');
__PACKAGE__->table('quux');

__PACKAGE__->result_source_instance->view_definition(
    "select * from quux");

__PACKAGE__->add_columns(
    etc => { data_type => 'text' },
    c  => { data_type => 'integer', is_nullable => 1 }
);

__PACKAGE__->set_primary_key('c');

__PACKAGE__->belongs_to( 'foo', 'ViewDeps::Result::Foo',
    { 'foreign.a' => 'self.c' } );

1;
Commit	Line	Data
ebed3aaf	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;