[dbsrgits/DBIx-Class.git] / t / 05multipk.t

use Test::More;

plan tests => 3;

use lib qw(t/lib);

use_ok('DBICTest');

ok(DBICTest::FourKeys->retrieve(1,2,3,4), "retrieve multiple pks without hash");
ok(DBICTest::FourKeys->retrieve(5,4,3,6), "retrieve multiple pks without hash");
Commit	Line	Data
6eec7501	1	use Test::More;
	2
	3	plan tests => 3;
	4
	5	use lib qw(t/lib);
	6
	7	use_ok('DBICTest');
	8
	9	ok(DBICTest::FourKeys->retrieve(1,2,3,4), "retrieve multiple pks without hash");
	10	ok(DBICTest::FourKeys->retrieve(5,4,3,6), "retrieve multiple pks without hash");