t/cdbi/testlib/Blurb.pm

   1 package # hide from PAUSE
   2     Blurb;
   3
   4 use warnings;
   5 use strict;
   6
   7 use base 'DBIC::Test::SQLite';
   8
   9 __PACKAGE__->set_table('Blurbs');
  10 __PACKAGE__->columns('Primary', 'Title');
  11 __PACKAGE__->columns('Blurb',   qw/ blurb/);
  12
  13 sub create_sql {
  14   return qq{
  15       title                   VARCHAR(255) PRIMARY KEY,
  16       blurb                   VARCHAR(255) NOT NULL
  17   }
  18 }
  19
  20 1;
  21