t/testlib/ActorAlias.pm

   1 package ActorAlias;\r
   2 \r
   3 BEGIN { unshift @INC, './t/testlib'; }\r
   4 \r
   5 use strict;\r
   6 use warnings;\r
   7 \r
   8 use base 'DBIx::Class::Test::SQLite';\r
   9 \r
  10 __PACKAGE__->set_table( 'ActorAlias' );\r
  11 \r
  12 __PACKAGE__->columns( Primary => 'id' );\r
  13 __PACKAGE__->columns( All     => qw/ actor alias / );\r
  14 __PACKAGE__->has_a( actor => 'Actor' );\r
  15 __PACKAGE__->has_a( alias => 'Actor' );\r
  16 \r
  17 sub create_sql {\r
  18         return qq{\r
  19                 id    INTEGER PRIMARY KEY,\r
  20                 actor INTEGER,\r
  21                 alias INTEGER\r
  22         }\r
  23 }\r
  24 \r
  25 1;\r
  26 \r