t/run/05multipk.tl

   1 sub run_tests {
   2
   3 plan tests => 2;
   4
   5 ok(DBICTest::FourKeys->find(1,2,3,4), "find multiple pks without hash");
   6 ok(DBICTest::FourKeys->find(5,4,3,6), "find multiple pks without hash");
   7
   8 }
   9
  10 1;