t/testlib/Director.pm

   1 package Director;
   2
   3 BEGIN { unshift @INC, './t/testlib'; }
   4
   5 use strict;
   6 use base 'DBIx::Class::Test::SQLite';
   7
   8 __PACKAGE__->set_table('Directors');
   9 __PACKAGE__->columns('All' => qw/ Name Birthday IsInsane /);
  10
  11 sub create_sql {
  12         return qq{
  13                         name                    VARCHAR(80),
  14                         birthday                INTEGER,
  15                         isinsane                INTEGER
  16         };
  17 }
  18
  19 1;
  20