t/cdbi/testlib/ActorAlias.pm

   1 package # hide from PAUSE
   2     ActorAlias;
   3
   4 use strict;
   5 use warnings;
   6
   7 use base 'DBIC::Test::SQLite';
   8
   9 __PACKAGE__->set_table( 'ActorAlias' );
  10
  11 __PACKAGE__->columns( Primary => 'id' );
  12 __PACKAGE__->columns( All     => qw/ actor alias / );
  13 __PACKAGE__->has_a( actor => 'Actor' );
  14 __PACKAGE__->has_a( alias => 'Actor' );
  15
  16 sub create_sql {
  17   return qq{
  18     id    INTEGER PRIMARY KEY,
  19     actor INTEGER,
  20     alias INTEGER
  21   }
  22 }
  23
  24 1;
  25