[dbsrgits/DBIx-Class.git] / t / lib / DBICTest / Schema / CustomSql.pm

package # hide from PAUSE
    DBICTest::Schema::CustomSql;

use warnings;
use strict;

use base qw/DBICTest::Schema::Artist/;
use mro 'c3';

__PACKAGE__->table('dummy');

__PACKAGE__->result_source_instance->name(\<<SQL);
  ( SELECT a.*, cd.cdid AS cdid, cd.title AS title, cd.year AS year
  FROM artist a
  JOIN cd ON cd.artist = a.artistid
  WHERE cd.year = ?)
SQL

sub sqlt_deploy_hook { $_[1]->schema->drop_table($_[1]) }

1;
Commit	Line	Data
8273e845	1	package # hide from PAUSE
b8b55c8e	2	DBICTest::Schema::CustomSql;
b8b55c8e	3
4a233f30	4	use warnings;
	5	use strict;
	6
b8b55c8e	7	use base qw/DBICTest::Schema::Artist/;
3aa25d8b	8	use mro 'c3';
b8b55c8e	9
	10	__PACKAGE__->table('dummy');
	11
	12	__PACKAGE__->result_source_instance->name(\<<SQL);
8273e845	13	( SELECT a.*, cd.cdid AS cdid, cd.title AS title, cd.year AS year
b8b55c8e	14	FROM artist a
	15	JOIN cd ON cd.artist = a.artistid
	16	WHERE cd.year = ?)
	17	SQL
	18
39be4120	19	sub sqlt_deploy_hook { $_[1]->schema->drop_table($_[1]) }
39be4120	20
b8b55c8e	21	1;