t/cdbi/testlib/Thing.pm

   1 package Thing;
   2 use base 'DBIC::Test::SQLite';
   3
   4 Thing->set_table("thing");
   5 Thing->columns(All => qw(id that_thing));
   6
   7 sub create_sql {
   8     return qq{
   9         id              INTEGER,
  10         that_thing      INTEGER
  11     };
  12 }
  13
  14 1;