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
   9 __PACKAGE__->table('dummy');
  10
  11 __PACKAGE__->result_source_instance->name(\<<SQL);
  12   ( SELECT a.*, cd.cdid AS cdid, cd.title AS title, cd.year AS year
  13   FROM artist a
  14   JOIN cd ON cd.artist = a.artistid
  15   WHERE cd.year = ?)
  16 SQL
  17
  18 sub sqlt_deploy_hook { $_[1]->schema->drop_table($_[1]) }
  19
  20 1;