sub run_tests {
my $schema = shift;
- plan tests => 45;
+ plan tests => 47;
my $dvd_rs = $schema->resultset('Dvd');
my $user_rs = $schema->resultset('User');
my $initial_dvd_count = $dvd_rs->count;
my $updates;
+ $dvd_rs->search( { dvd_id => 1 } )->recursive_update( {
+ owner => { username => 'aaa' }
+ },
+ [ 'dvd_id' ]
+ );
+
+ my $u = $user_rs->find( $dvd_rs->find( 1 )->owner->id );
+ is( $u->username, 'aaa', 'fixed_fields' );
+
# try to create with a not existing rel
$updates = {
name => 'Test name for nonexisting rel',
->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