X-Git-Url: https://git.dogcows.com/gitweb?p=chaz%2Fp5-DBIx-Class-ResultSet-RecursiveUpdate;a=blobdiff_plain;f=t%2Flib%2FRunTests.pm;h=d3a4f7ba4de0f0c980d506672ab7e9bbee9a66a3;hp=defb70128de29976bb718a57ab4999d0328966dc;hb=f3ef41031535349b6582bbf59638ac3b1cc8e3e0;hpb=26d2267b2b938a7b6ee683d1b8e6e500bbb893d1

diff --git a/t/lib/RunTests.pm b/t/lib/RunTests.pm
index defb701..d3a4f7b 100644
--- a/t/lib/RunTests.pm
+++ b/t/lib/RunTests.pm
@@ -9,7 +9,7 @@ use DBIx::Class::ResultSet::RecursiveUpdate;
 sub run_tests {
     my $schema = shift;
 
-    plan tests => 45;
+    plan tests => 46;
 
     my $dvd_rs  = $schema->resultset('Dvd');
     my $user_rs = $schema->resultset('User');
@@ -95,6 +95,10 @@ sub run_tests {
             ->find( { key1 => $onekey->id, key2 => 1 } ),
         'Twokeys_belongsto created'
     );
+    TODO: {
+        local $TODO = 'value of fk from a multi relationship';
+        is( $dvd->twokeysfk, $onekey->id, 'twokeysfk in Dvd' );
+    };
     is( $dvd->name, 'Test name', 'Dvd name set' );
 
     # changing existing records