t/lib/DBICTest/Schema/CustomSql.pm

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