t/cdbi/testlib/Order.pm

   1 package # hide from PAUSE
   2     Order;
   3
   4 use warnings;
   5 use strict;
   6
   7 use base 'DBIC::Test::SQLite';
   8
   9 __PACKAGE__->set_table('orders');
  10 __PACKAGE__->table_alias('orders');
  11 __PACKAGE__->columns(Primary => 'film');
  12 __PACKAGE__->columns(Others  => qw/orders/);
  13
  14 sub create_sql {
  15   return qq{
  16     film     VARCHAR(255),
  17     orders   INTEGER
  18   };
  19 }
  20
  21 1;
  22