t/cdbi/testlib/Order.pm

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