X-Git-Url: https://git.dogcows.com/gitweb?p=chaz%2Fp5-DBIx-Class-ResultSet-RecursiveUpdate;a=blobdiff_plain;f=t%2Flib%2FRunTests.pm;h=0c877f896d45dfa9ad1a93aee90a55c11aa06148;hp=cce65e02bda418cf5fbfcbb5dfda6e0686f19639;hb=863ebdd6ecb92e434d8f18f91c79ebdf0e937fe3;hpb=dd98344ab0d8b1c141f7090ffa576ff2f25b9f51 diff --git a/t/lib/RunTests.pm b/t/lib/RunTests.pm index cce65e0..0c877f8 100644 --- a/t/lib/RunTests.pm +++ b/t/lib/RunTests.pm @@ -9,7 +9,7 @@ use Test::More; sub run_tests{ my $schema = shift; - plan tests => 24; + plan tests => 25; my $dvd_rs = $schema->resultset( 'Dvd' ); my $user_rs = $schema->resultset( 'User' ); @@ -82,7 +82,10 @@ sub run_tests{ username => 'new name a', name => 'new name a', password => 'new password a', - } + }, + liner_notes => { + notes => 'test note changed', + }, }; $dvd = $dvd_rs->recursive_update( $updates ); @@ -91,6 +94,8 @@ sub run_tests{ is ( $dvd->owner->id, $another_owner->id, 'Owner updated' ); is ( $dvd->current_borrower->name, 'new name a', 'Related record modified' ); is ( $dvd->tags->count, 0, 'Tags deleted' ); + is ( $dvd->liner_notes->notes, 'test note changed', 'might_have record changed' ); + # repeatable