[Bast-commits] r7878 - DBIx-Class/0.08/branches/view_rels/t/lib/DBICTest/Schema

[abraxxa at dev.catalyst.perl.org]

Author: abraxxa
Date: 2009-11-13 12:05:45 +0000 (Fri, 13 Nov 2009)
New Revision: 7878

Modified:
   DBIx-Class/0.08/branches/view_rels/t/lib/DBICTest/Schema/Track.pm
   DBIx-Class/0.08/branches/view_rels/t/lib/DBICTest/Schema/Year1999CDs.pm
   DBIx-Class/0.08/branches/view_rels/t/lib/DBICTest/Schema/Year2000CDs.pm
Log:
seems I found the bugger


Modified: DBIx-Class/0.08/branches/view_rels/t/lib/DBICTest/Schema/Track.pm
===================================================================
--- DBIx-Class/0.08/branches/view_rels/t/lib/DBICTest/Schema/Track.pm	2009-11-13 11:05:50 UTC (rev 7877)
+++ DBIx-Class/0.08/branches/view_rels/t/lib/DBICTest/Schema/Track.pm	2009-11-13 12:05:45 UTC (rev 7878)
@@ -50,4 +50,15 @@
 __PACKAGE__->might_have( cd_single => 'DBICTest::Schema::CD', 'single_track' );
 __PACKAGE__->might_have( lyrics => 'DBICTest::Schema::Lyrics', 'track_id' );
 
+__PACKAGE__->belongs_to(
+    "year1999cd",
+    "DBICTest::Schema::Year1999CDs",
+    { "foreign.cdid" => "self.cd" },
+);
+__PACKAGE__->belongs_to(
+    "year2000cd",
+    "DBICTest::Schema::Year2000CDs",
+    { "foreign.cdid" => "self.cd" },
+);
+
 1;

Modified: DBIx-Class/0.08/branches/view_rels/t/lib/DBICTest/Schema/Year1999CDs.pm
===================================================================
--- DBIx-Class/0.08/branches/view_rels/t/lib/DBICTest/Schema/Year1999CDs.pm	2009-11-13 11:05:50 UTC (rev 7877)
+++ DBIx-Class/0.08/branches/view_rels/t/lib/DBICTest/Schema/Year1999CDs.pm	2009-11-13 12:05:45 UTC (rev 7878)
@@ -29,6 +29,7 @@
 __PACKAGE__->add_unique_constraint([ qw/artist title/ ]);
 
 __PACKAGE__->belongs_to( artist => 'DBICTest::Schema::Artist' );
-__PACKAGE__->has_many( tracks => 'DBICTest::Schema::Track' );
+__PACKAGE__->has_many( tracks => 'DBICTest::Schema::Track',
+    { "foreign.cd" => "self.cdid" });
 
 1;

Modified: DBIx-Class/0.08/branches/view_rels/t/lib/DBICTest/Schema/Year2000CDs.pm
===================================================================
--- DBIx-Class/0.08/branches/view_rels/t/lib/DBICTest/Schema/Year2000CDs.pm	2009-11-13 11:05:50 UTC (rev 7877)
+++ DBIx-Class/0.08/branches/view_rels/t/lib/DBICTest/Schema/Year2000CDs.pm	2009-11-13 12:05:45 UTC (rev 7878)
@@ -28,6 +28,7 @@
 __PACKAGE__->add_unique_constraint([ qw/artist title/ ]);
 
 __PACKAGE__->belongs_to( artist => 'DBICTest::Schema::Artist' );
-__PACKAGE__->has_many( tracks => 'DBICTest::Schema::Track' );
+__PACKAGE__->has_many( tracks => 'DBICTest::Schema::Track',
+    { "foreign.cd" => "self.cdid" });
 
 1;