[dbsrgits/DBIx-Class.git] / t / cdbi / testlib / Order.pm

package # hide from PAUSE 
    Order;

use strict;
use base 'DBIC::Test::SQLite';

__PACKAGE__->set_table('orders');
__PACKAGE__->table_alias('orders');
__PACKAGE__->columns(Primary => 'film');
__PACKAGE__->columns(Others  => qw/orders/);

sub create_sql {
	return qq{
		film     VARCHAR(255),
		orders   INTEGER
	};
}

1;
Commit	Line	Data
c6d74d3e	1	package # hide from PAUSE
c6d74d3e	2	Order;
ea2e61bf	3
ea2e61bf	4	use strict;
97d61088	5	use base 'DBIC::Test::SQLite';
ea2e61bf	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