might_have with non pk fk

[chaz/p5-DBIx-Class-ResultSet-RecursiveUpdate] / t / lib / DBSchema / Result / User.pm

diff --git a/t/lib/DBSchema/Result/User.pm b/t/lib/DBSchema/Result/User.pm
index b8f53a5da0b9f30abcdad3de8dbf8009a78c2483..363271daafc067def1ddc99e8aec81f85eb5146b 100644 (file)
--- a/t/lib/DBSchema/Result/User.pm
+++ b/t/lib/DBSchema/Result/User.pm
@@ -38,5 +38,11 @@ __PACKAGE__->has_many(
 );
 __PACKAGE__->many_to_many('roles', 'user_roles' => 'role');
 
+__PACKAGE__->might_have(
+    "address",
+    "DBSchema::Result::Address",
+    { 'foreign.user_id' => 'self.id' }
+);
+
 1;