t/lib/DBICTest/Schema/SelfRefAlias.pm

   1 package DBICTest::Schema::SelfRefAlias;\r
   2 \r
   3 use base 'DBIx::Class::Core';\r
   4 \r
   5 __PACKAGE__->table('self_ref_alias');\r
   6 __PACKAGE__->add_columns(qw/self_ref alias/);\r
   7 __PACKAGE__->set_primary_key('self_ref alias');\r
   8 __PACKAGE__->add_relationship(\r
   9     self_ref => 'DBICTest::Schema::SelfRef',\r
  10     { 'foreign.id' => 'self.self_ref' },\r
  11     { accessor     => 'single' }\r
  12 \r
  13 );\r
  14 __PACKAGE__->add_relationship(\r
  15     alias => 'DBICTest::Schema::SelfRef',\r
  16     { 'foreign.id' => 'self.alias' },\r
  17     { accessor     => 'single' }\r
  18 );\r
  19 \r
  20 1;\r